/usr/share/psychtoolbox-3/PsychOneliners/MakeSineImage.m is in psychtoolbox-3-common 3.0.11.20131230.dfsg1-1build1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 | function [image] = MakeSineImage(freqi,freqj,nRowPixels,nColPixels)
% [image] = MakeSineImage(freqi,freqj,nRowPixels,[nColPixels])
%
% Computes a two-dimensional sine function image.
%
% The image has dimensions nRowPixels by nColPixels.
% If nColPixels is omitted, a square image is returned.
%
% 8/15/94 dhb Both row and column dimensions used if passed.
% dhb Changed zero frequency convention.
% 6/20/98 dhb, mw Fixed error in zero handling case.
% Set column pixels for square image if it wasn't passed.
if (nargin <= 3)
nColPixels = nRowPixels;
end
x = 1:nColPixels;
y = 1:nRowPixels;
usefreqi = 2*pi*freqi/nRowPixels;
usefreqj = 2*pi*freqj/nColPixels;
% Handle zero frequency case
if (usefreqj == 0 && usefreqi ~= 0)
sinx = ones(size(x));
else
sinx = sin(usefreqj*x);
end
% Handle zero frequency case
if (usefreqi == 0 && usefreqj ~= 0)
siny = ones(size(y));
else
siny = sin(usefreqi*y);
end
% Build composite image
image = siny'*sinx;
|