1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36
|
/*
* efron.cpp
* Mothur
*
* Created by Thomas Ryabin on 5/13/09.
* Copyright 2009Schloss Lab UMASS Amherst. All rights reserved.
*
*/
#include "efron.h"
/***********************************************************************/
EstOutput Efron::getValues(SAbundVector* rank){
try {
data.resize(1,0);
double n = (double)rank->getNumSeqs();
if(f > n || f == 0) { f = n; }
double sum = 0;
for(int i = 1; i < rank->size(); i++){
sum += pow(-1., i+1) * pow(((double)f / n), i) * (double)(rank->get(i));
}
data[0] = sum;
return data;
}
catch(exception& e) {
m->errorOut(e, "Efron", "getValues");
exit(1);
}
}
/***********************************************************************/
|