/usr/share/psychtoolbox-3/Psychometric/FitNakaRushtonFun.m is in psychtoolbox-3-common 3.0.9+svn2579.dfsg1-1.
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 | function [f] = FitNakaRushtonFun(params,contrast,response)
% [f] = FitNakaRushtonFun(params,contrast,response)
%
% Evaluate model fit and return measure of goodness of fit (f).
%
% 8/1/05 dhb, pr Wrote it.
% 8/2/07 dhb Get rid of silly call to ComputeNakaRushtonError.
% Unpack paramters, make predictions
prediction = ComputeNakaRushton(params,contrast);
nPoints = length(prediction);
error = prediction-response;
f = 10000*sqrt(sum(error.^2)/nPoints);
% Handle bizarre parameter values.
if (isnan(f))
f = 2000;
end
|