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
37
38
39
40
41
42
|
/*
* shen.cpp
* Mothur
*
* Created by Thomas Ryabin on 5/18/09.
* Copyright 2009Schloss Lab UMASS Amherst. All rights reserved.
*
*/
#include "shen.h"
#include "ace.h"
/***********************************************************************/
EstOutput Shen::getValues(SAbundVector* rank){
try {
data.resize(1,0);
double n = (double)rank->getNumSeqs();
double f1 = (double)rank->get(1);
Ace* calc = new Ace(abund);
EstOutput ace = calc->getValues(rank);
double f0 = ace[0]-rank->getNumBins();
data[0] = f0 * (1 - pow(1 - f1/n/f0, f));
delete calc;
return data;
}
catch(exception& e) {
m->errorOut(e, "Shen", "getValues");
exit(1);
}
}
/***********************************************************************/
|
