File: FindCmfPeaks.m

package info (click to toggle)
psychtoolbox-3 3.0.14.20170103%2Bgit6-g605ff5c.dfsg1-1
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 103,044 kB
  • ctags: 69,483
  • sloc: ansic: 167,371; cpp: 11,232; objc: 4,708; sh: 1,875; python: 383; php: 344; makefile: 207; java: 113
file content (14 lines) | stat: -rw-r--r-- 358 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
function [peakWls,peakVals] = FindCmfPeaks(S_xxx,T_xxx)
%  [peakWls,peakVals] = FindCmfPeaks(S_xxx,T_xxx)
% 
% Return the peak wavelengths and peak values of a set of color matching functions (T_xxx).
%
% 8/12/13  dhb  Wrote it.

wls = SToWls(S_xxx);
for i = 1:size(T_xxx,1)
    [peakVals(i),index] = max(T_xxx(i,:));
    peakWls(i) = wls(index(1));
end

end