Computes the equivalent sample size of censored data. Observations at lower detection limits have a greater percent of the equivalent information of a detected value than observations at higher detection limits.
equivalent_n(y.var, y.cen, printstat = TRUE)
The column of data values plus detection limits.
The column of indicators, where 1 (or TRUE
) indicates a detection limit in the y.var
column, and 0 (or FALSE
) indicates a detected value in y.var
.
Logical TRUE
/FALSE
option of whether to print the resulting statistics in the console window, or not. Default is TRUE.
Prints summary statistics including
n
sample size
n.cen
number of censored data
pct.cen
percent of data censored
min
minimum reported value
max
maximum reported value
Summary of censored data including
limit
detection limit
n
number of censored values per limit
uncen
number of detected values at or above the limit
pexceed
proportion of data that exceeds the limit
Summary of the equivalent sample size for detected and censored values.
n.equiv
the equivalent number of observations
n.cen.equiv
equivalent number of detected obs in the censored data
n.detected
number of uncensored values
Based on "Method 2" of Dr. Brenda Gillespie's talk at ASA National Meeting 2019. This method differs from hers in how the percentile probabilities for the detection limits are computed. Probabilities here are computed using Regression on Order Statistics (ROS).
Computes the equivalent n, the number of observations including censored values, as a measure of information content for data with nondetects.
Helsel, D.R., 2011. Statistics for Censored Environmental Data using Minitab and R, 2nd ed. John Wiley & Sons, USA, N.J.
Gillespie, B.W., Dominguez, A., Li, Y., 2019. Quantifying the information in values below the detection limit (left-censored data). Presented at the 2019 Joint Statistical Meetings of the Amer. Stat. Assoc., Denver, CO., July 31, 2019.
data(Brumbaugh)
equivalent_n(Brumbaugh$Hg,Brumbaugh$HgCen)
#> data: Brumbaugh$Hg
#> $all
#> all variable
#> 1 133.0000 n
#> 2 15.0000 n.cen
#> 3 11.2782 pct.cen
#> 4 0.0300 min
#> 5 4.2200 max
#>
#> $limits
#> limit n uncen pexceed
#> 1 0.03 3 1 0.9348371
#> 2 0.05 4 10 0.9131161
#> 3 0.10 8 107 0.8045113
#>
#> equivalent sample size:
#> n.equiv n.cen.equiv n.detected
#> 130.8931 12.89307 118