diff --git a/R/cfa_groupwise.R b/R/cfa_groupwise.R
index b709f58..3e9f2bc 100644
--- a/R/cfa_groupwise.R
+++ b/R/cfa_groupwise.R
@@ -1,6 +1,6 @@
 #' Confirmatory Factor Analysis (groupwise)
 #'
-#' `r lifecycle::badge("experimental")` \cr
+#' `r lifecycle::badge("superseded")` \cr
 #' This function will run N number of CFA where N = `length(group)`, and report the fit measures of CFA in each group.
 #' The function is intended to help you get a better understanding of which group has abnormal fit indicator
 #'
diff --git a/man/cfa_groupwise.Rd b/man/cfa_groupwise.Rd
index 313e0f1..a1a1f84 100644
--- a/man/cfa_groupwise.Rd
+++ b/man/cfa_groupwise.Rd
@@ -21,7 +21,7 @@ cfa_groupwise(data, ..., group, model = NULL, ordered = FALSE)
 a \code{data.frame} with group-wise CFA result
 }
 \description{
-\ifelse{html}{\href{https://lifecycle.r-lib.org/articles/stages.html#experimental}{\figure{lifecycle-experimental.svg}{options: alt='[Experimental]'}}}{\strong{[Experimental]}} \cr
+\ifelse{html}{\href{https://lifecycle.r-lib.org/articles/stages.html#superseded}{\figure{lifecycle-superseded.svg}{options: alt='[Superseded]'}}}{\strong{[Superseded]}} \cr
 This function will run N number of CFA where N = \code{length(group)}, and report the fit measures of CFA in each group.
 The function is intended to help you get a better understanding of which group has abnormal fit indicator
 }
diff --git a/tests/testthat/test-cor-test.R b/tests/testthat/test-cor-test.R
new file mode 100644
index 0000000..5aacf69
--- /dev/null
+++ b/tests/testthat/test-cor-test.R
@@ -0,0 +1,3 @@
+testthat::expect_no_error(cor_test(iris, where(is.numeric)))
+
+testthat::expect_no_error(cor_test(iris, where(is.numeric),show_p = T))
\ No newline at end of file