new function master !

FRBCesab · May 3, 2023 · d202d16 · d202d16
1 parent b8084a2
commit d202d16
Show file tree

Hide file tree

Showing 5 changed files with 46 additions and 0 deletions.
diff --git a/NAMESPACE b/NAMESPACE
@@ -7,4 +7,5 @@ export(leading_zero)
 export(len)
 export(multi_merge)
 export(rename_col)
+export(signi)
 export(to_binomial_name)
diff --git a/R/signi.R b/R/signi.R
@@ -0,0 +1,19 @@
+#' Produce produces significance symbols for the values of p (ns., *, **, ***)
+#'
+#' @param p a p value
+#' 
+#' @return a character "ns", "*", "**", "***" 
+#' 
+#' @export
+#'
+#' @examples
+#' signi(p=0.004)
+#' 
+
+signi <- function(p){
+  if (p>0.05) symbol="ns."
+  if ((p<=0.05) & (p>0.01)) symbol="*"
+  if ((p<=0.01) & (p>0.001)) symbol="**"
+  if (p<=0.001) symbol="***"
+  return(symbol)
+}
diff --git a/README.Rmd b/README.Rmd
@@ -63,6 +63,8 @@ library("rutils")
 
 - [`rename_col()`](https://frbcesab.github.io/rutils/reference/rename_col.html): Rename any columns of a dataframe (from 1 to as much columns as you want)
 
+- [`rename_col()`](https://frbcesab.github.io/rutils/reference/signi.html): Produce produces significance symbols for the values of p
+
 
 ## Contribution
 

diff --git a/README.md b/README.md
@@ -62,6 +62,9 @@ library("rutils")
   Rename any columns of a dataframe (from 1 to as much columns as you
   want)
 
+- [`rename_col()`](https://frbcesab.github.io/rutils/reference/signi.html):
+  Produce produces significance symbols for the values of p
+
 ## Contribution
 
 Visit the

diff --git a/man/signi.Rd b/man/signi.Rd