AdjustAbbott {ecotoxicology} | R Documentation |
Returns the corrected efficacy % with Abbott's formula
AdjustAbbott(smoothedObservedProportion, ps0 = smoothedObservedProportion[1], p1 = 1)
smoothedObservedProportion |
numeric vector, treated population |
ps0 |
numeric vector, control |
p1 |
numeric vector, percentage 0 to1 or 0 to 100 (p1=1 or P1=100) |
the corrected efficacy %
Jose Gama
ehabsoft, last accessed 2015 http://www.ehabsoft.com/ldpline/onlinecontrol.htm
Puntener W., 1981 Manual for field trials in plant protection second edition. Agricultural Division, Ciba-Geigy Limited.
#same result as example on Short-term Methods for Estimating the Chronic Toxicity of #Effluents and Receiving Waters to Freshwater Organisms.TABLE J1. page 312 data(SheepsheadMinnow40SK) IsMonotonicallyIncreasing(SheepsheadMinnow40SK[,2]/40) mydata <- cbind(SheepsheadMinnow40SK, MakeMonotonicallyIncreasing(cbind(rep(40,6),SheepsheadMinnow40SK[,2]))) AdjustAbbott(mydata[,3])