% Some fake data to use in testing:
% Presumably you have your own values for these.
nExpts = 10;
C = rand(nExpts,1);
V1 = rand(nExpts,1);
V2 = rand(nExpts,1);
R1 = rand(nExpts,1);
R2 = rand(nExpts,1);
Nraw = rand(nExpts,1);
% Some boundaries on where you think the best delta might lie.
minDelta = -100;
maxDelta = 100;
% This function call will give you the best delta and the low correlation that it produces:
[bestDelta, bestCorr] = findDelta(C,V1,V2,R1,R2,Nraw,minDelta,maxDelta)
% This function does the actual work:
function [bestDelta, bestCorr] = findDelta(C,V1,V2,R1,R2,Nraw,minDelta,maxDelta)
[bestDelta, bestCorr] = fminbnd(@fCorr,minDelta,maxDelta);
function theCorr = fCorr(tryDelta)
Ncorrected = C .* (V1 * tryDelta + V2) ./ (V1 .* R1 * tryDelta + V2 .* R2) .* Nraw;
theCorr = abs( corr(V1,Ncorrected) ); % I'm guessing you want the correlation close to zero, not -1
end
end
