Format p values

nice_p(p, equal_sign = FALSE, digits = 3, stars = FALSE)

Arguments

p: Vector of p values.
equal_sign: If TRUE an equal sign is set before p values.
digits: Number of digits to show for p values >= 0.05.
stars: If TRUE, significance stars are added for p values < 0.05.

Value

A character vector with nicely formatted p values

Examples

p <- c(0.04, 0.9, 0.10, 0.001, 1, NA)
nice_p(p)
#> [1] "<.05"  ".900"  ".100"  "<.01"  "1.000" NA     
paste0("p", nice_p(p, equal_sign = TRUE))
#> [1] "p<.05"   "p=.900"  "p=.100"  "p<.01"   "p=1.000" "pNA"    
nice_p(p, stars = TRUE)
#> [1] ".040*"  ".900"   ".100"   ".001**" "1.000"  NA      
paste0("p", nice_p(p, equal_sign = TRUE, stars = TRUE))
#> [1] "p=.040*"  "p=.900"   "p=.100"   "p=.001**" "p=1.000"  "pNA"     
nice_p(c(0.0004, 0.005, 0.03, 0.2), stars = TRUE)
#> [1] "<.001***" ".005**"   ".030*"    ".200"    
paste0("p", nice_p(c(0.0004, 0.005, 0.03, 0.2), equal_sign = TRUE, stars = TRUE))
#> [1] "p<.001***" "p=.005**"  "p=.030*"   "p=.200"