output in t_value

ropensci · Mar 29, 2024 · 7125f85 · 7125f85
1 parent 44303ef
commit 7125f85
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/t_value.R b/R/t_value.R
@@ -11,4 +11,5 @@
 
 t_value <- function(r, n) {
   t_value <- (r * sqrt(n - 1)) / sqrt(1 - r^2)
+  t_value
 }