pval = c(0, 10^-6, 0.001, 0.01, 1, NA, -Inf, Inf, NaN)
cbind(
input = pval,
# default; replace zeros with typical R machine precision for doubles
minlog10_default = minlog10_fixzero(pval),
# alternatively, replace zero with lowest non-zero pvalue in input
minlog10_limit_from_data = minlog10_fixzero(pval, limit = NA)
)
Run the code above in your browser using DataLab