diff options
Diffstat (limited to 'SD-VBS/benchmarks/texture_synthesis/src/matlab/mkR.m')
| -rwxr-xr-x | SD-VBS/benchmarks/texture_synthesis/src/matlab/mkR.m | 32 |
1 files changed, 0 insertions, 32 deletions
diff --git a/SD-VBS/benchmarks/texture_synthesis/src/matlab/mkR.m b/SD-VBS/benchmarks/texture_synthesis/src/matlab/mkR.m deleted file mode 100755 index a1e8448..0000000 --- a/SD-VBS/benchmarks/texture_synthesis/src/matlab/mkR.m +++ /dev/null | |||
| @@ -1,32 +0,0 @@ | |||
| 1 | % IM = mkR(SIZE, EXPT, ORIGIN) | ||
| 2 | % | ||
| 3 | % Compute a matrix of dimension SIZE (a [Y X] 2-vector, or a scalar) | ||
| 4 | % containing samples of a radial ramp function, raised to power EXPT | ||
| 5 | % (default = 1), with given ORIGIN (default = (size+1)/2, [1 1] = | ||
| 6 | % upper left). All but the first argument are optional. | ||
| 7 | |||
| 8 | % Eero Simoncelli, 6/96. | ||
| 9 | |||
| 10 | function [res] = mkR(sz, expt, origin) | ||
| 11 | |||
| 12 | sz = sz(:); | ||
| 13 | if (size(sz,1) == 1) | ||
| 14 | sz = [sz,sz]; | ||
| 15 | end | ||
| 16 | |||
| 17 | % ----------------------------------------------------------------- | ||
| 18 | % OPTIONAL args: | ||
| 19 | |||
| 20 | if (exist('expt') ~= 1) | ||
| 21 | expt = 1; | ||
| 22 | end | ||
| 23 | |||
| 24 | if (exist('origin') ~= 1) | ||
| 25 | origin = (sz+1)/2; | ||
| 26 | end | ||
| 27 | |||
| 28 | % ----------------------------------------------------------------- | ||
| 29 | |||
| 30 | [xramp,yramp] = meshgrid( [1:sz(2)]-origin(2), [1:sz(1)]-origin(1) ); | ||
| 31 | |||
| 32 | res = (xramp.^2 + yramp.^2).^(expt/2); | ||
