# NOT RUN {
# CV for all detected values
cen_result <- rep("", 10)
result <- c(1:10)
cv_adj(cen_result, result)
# CV for all non-detected values
cen_result <- rep("<", 10)
cv_adj(cen_result, result)
# CV for fewer than 10 measurements
cen_result <- rep("", 5)
result <- c(1:5)
cv_adj(cen_result, result)
# Change the default substitution value
cen_result <- c(rep("<", 5), rep("", 15))
result <- c(101:120)
cv_adj(cen_result, result) # Use default 0.5 multiplier
# Use 1.0 multiplier (equivalent to using MDL)
cv_adj(cen_result, result, nd_adjustment = 1.0)
# Use 0.0 multiplier (equivalent to zero substitution)
cv_adj(cen_result, result, nd_adjustment = 0)
# }
Run the code above in your browser using DataLab