https://github.com/SBIUCD/BDiffProt
Tip revision: d08cfc4340c37feac5601cf801a5268ea088203d authored by SBIUCD on 12 May 2016, 10:42:40 UTC
Create README.txt
Create README.txt
Tip revision: d08cfc4
BFDR.m
function [I] = BFDR(P,alpha)
%%
r=1:-0.01:0;
for i=1:length(r)
I=P>=r(i);
FDR=sum(I.*(1-P))/(sum(I.*P)+0.0001)
if FDR>=alpha/100
break;
end
end
end
