File: Resolute.m

package info (click to toggle)
psychtoolbox-3 3.0.19.14.dfsg1-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 86,796 kB
  • sloc: ansic: 176,245; cpp: 20,103; objc: 5,393; sh: 2,753; python: 1,397; php: 384; makefile: 193; java: 113
file content (20 lines) | stat: -rw-r--r-- 781 bytes parent folder | download | duplicates (6)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
function newplaat = Resolute(plaat,newres)
% newplaat = Resolute(plaat,newres)
% accepts matrix PLAAT and resizes it to NEWRES
% resizing is done by cutting and/or adding a white background
%
% JvR & DN 2008       Wrote it
% DN       2008-07-30 Simplified

res             = size(plaat);

maxres          = max([res(1:2); newres]);
maxplaat        = 255*ones([maxres 3]);                             % create white canvas the size of the output

center          = CenterRect([1 1 res(1:2)],[1 1 maxres]);          % PsychToolBox function
newcenter       = CenterRect([1 1 newres]  ,[1 1 maxres]);

maxplaat(center(1):center(3),center(2):center(4),:)...
                = plaat;

newplaat        = maxplaat(newcenter(1):newcenter(3),newcenter(2):newcenter(4),:);