Skip to content

Instantly share code, notes, and snippets.

@tjmahr

tjmahr/pvalue_stars.R

Created November 28, 2015 01:39
Show Gist options
  • Save tjmahr/555b94262f08cc5956f3 to your computer and use it in GitHub Desktop.
Save tjmahr/555b94262f08cc5956f3 to your computer and use it in GitHub Desktop.
Download ZIP
pvalue_stars
Raw
pvalue_stars.R
get_p_stars <- function(ps) {
symnum(ps, na = FALSE, cutpoints = c(0, 0.001, 0.01, 0.05, 0.1, 1),
symbols = c("***", "**", "*", ".", " "), legend = FALSE)
}
#> get_p_stars(c(.00001, .001, .002, .01, .02, .05, .06, .1, .2))
#> [1] *** *** ** ** * * . .
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment