diff options
Diffstat (limited to 'SD-VBS/benchmarks/texture_synthesis/src/matlabPyrTools/mkR.m')
-rwxr-xr-x | SD-VBS/benchmarks/texture_synthesis/src/matlabPyrTools/mkR.m | 32 |
1 files changed, 0 insertions, 32 deletions
diff --git a/SD-VBS/benchmarks/texture_synthesis/src/matlabPyrTools/mkR.m b/SD-VBS/benchmarks/texture_synthesis/src/matlabPyrTools/mkR.m deleted file mode 100755 index a1e8448..0000000 --- a/SD-VBS/benchmarks/texture_synthesis/src/matlabPyrTools/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); | ||