Round and format p-values
Examples
p_vec <- c(0.00001, 0.01111, 0.0500000, 0.15, 0.99999)
format_p(p_vec)
#> [1] "<0.001" "0.011" "0.050" "0.15" ">0.9"
format_p(p_vec, 2)
#> [1] "<0.001" "0.011" "0.050" "0.15" ">0.99"
format_p(p_vec, 3)
#> [1] "<0.001" "0.011" "0.050" "0.150" ">0.999"