1.4.2 for cran, bugfix tb1module

jinseob2kim · Aug 8, 2023 · de1fef2 · de1fef2
1 parent 35e7e99
commit de1fef2
Show file tree

Hide file tree

Showing 4 changed files with 9 additions and 9 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: jsmodule
 Title: 'RStudio' Addins and 'Shiny' Modules for Medical Research
 Version: 1.4.2
-Date: 2023-08-01
+Date: 2023-08-08
 Authors@R: c(person("Jinseob", "Kim", email = "jinseob2kim@gmail.com", role = c("aut", "cre"),  comment = c(ORCID = "0000-0002-9403-605X")),
              person("Zarathu", role = c("cph", "fnd")),
              person("Hyunki", "Lee", email = "leevenstar@snu.ac.kr", role = c("aut")),

diff --git a/R/jsBasicGadget.R b/R/jsBasicGadget.R
@@ -109,7 +109,7 @@ jsBasicGadget <- function(data, nfactor.limit = 20) {
           ),
           wellPanel(
             h5("Normal continuous variables  are summarized with Mean (SD) and t-test (2 groups) or ANOVA (> 2 groups)"),
-            h5("Non-normal continuous variables are summarized with median [IQR or min,max] and kruskal-wallis test"),
+            h5("Non-normal continuous variables are summarized with median [IQR or min,max] and wilcox(2 groups)/kruskal-wallis(>3 groups) test"),
             h5("Categorical variables  are summarized with table")
           )
         )
@@ -802,7 +802,7 @@ jsBasicExtAddin <- function(nfactor.limit = 20, max.filesize = 2048) {
           ),
           wellPanel(
             h5("Normal continuous variables  are summarized with Mean (SD) and t-test (2 groups) or ANOVA (> 2 groups)"),
-            h5("Non-normal continuous variables are summarized with median [IQR or min,max] and kruskal-wallis test"),
+            h5("Non-normal continuous variables are summarized with median [IQR or min,max] and wilcox(2 groups)/kruskal-wallis(>3 groups) test"),
             h5("Categorical variables  are summarized with table")
           )
         )

diff --git a/R/jsPropensityGadget.R b/R/jsPropensityGadget.R
@@ -115,7 +115,7 @@ jsPropensityGadget <- function(data, nfactor.limit = 20) {
               withLoader(DTOutput("table1_original"), type = "html", loader = "loader6"),
               wellPanel(
                 h5("Normal continuous variables  are summarized with Mean (SD) and t-test(2 groups) or ANOVA(> 2 groups)"),
-                h5("Non-normal continuous variables are summarized with median [IQR or min,max] and kruskal-wallis test"),
+                h5("Non-normal continuous variables are summarized with median [IQR or min,max] and wilcox(2 groups)/kruskal-wallis(>3 groups) test"),
                 h5("Categorical variables  are summarized with table")
               )
             ),
@@ -124,7 +124,7 @@ jsPropensityGadget <- function(data, nfactor.limit = 20) {
               withLoader(DTOutput("table1_ps"), type = "html", loader = "loader6"),
               wellPanel(
                 h5("Normal continuous variables  are summarized with Mean (SD) and t-test(2 groups) or ANOVA(> 2 groups)"),
-                h5("Non-normal continuous variables are summarized with median [IQR or min,max] and kruskal-wallis test"),
+                h5("Non-normal continuous variables are summarized with median [IQR or min,max] and wilcox(2 groups)/kruskal-wallis(>3 groups) test"),
                 h5("Categorical variables  are summarized with table")
               )
             ),
@@ -1137,7 +1137,7 @@ jsPropensityExtAddin <- function(nfactor.limit = 20, max.filesize = 2048) {
               withLoader(DTOutput("table1_original"), type = "html", loader = "loader6"),
               wellPanel(
                 h5("Normal continuous variables  are summarized with Mean (SD) and t-test(2 groups) or ANOVA(> 2 groups)"),
-                h5("Non-normal continuous variables are summarized with median [IQR or min,max] and kruskal-wallis test"),
+                h5("Non-normal continuous variables are summarized with median [IQR or min,max] and wilcox(2 groups)/kruskal-wallis(>3 groups) test"),
                 h5("Categorical variables  are summarized with table")
               )
             ),
@@ -1146,7 +1146,7 @@ jsPropensityExtAddin <- function(nfactor.limit = 20, max.filesize = 2048) {
               withLoader(DTOutput("table1_ps"), type = "html", loader = "loader6"),
               wellPanel(
                 h5("Normal continuous variables  are summarized with Mean (SD) and t-test(2 groups) or ANOVA(> 2 groups)"),
-                h5("Non-normal continuous variables are summarized with median [IQR or min,max] and kruskal-wallis test"),
+                h5("Non-normal continuous variables are summarized with median [IQR or min,max] and wilcox(2 groups)/kruskal-wallis(>3 groups) test"),
                 h5("Categorical variables  are summarized with table")
               )
             ),

diff --git a/R/jsRepeatedGadget.R b/R/jsRepeatedGadget.R
@@ -90,7 +90,7 @@ jsRepeatedGadget <- function(data, nfactor.limit = 20) {
           withLoader(DTOutput("table1"), type = "html", loader = "loader6"),
           wellPanel(
             h5("Normal continuous variables  are summarized with Mean (SD) and t-test(2 groups) or ANOVA(> 2 groups)"),
-            h5("Non-normal continuous variables are summarized with median [IQR or min,max] and kruskal-wallis test"),
+            h5("Non-normal continuous variables are summarized with median [IQR or min,max] and wilcox(2 groups)/kruskal-wallis(>3 groups) test"),
             h5("Categorical variables  are summarized with table")
           )
         )
@@ -636,7 +636,7 @@ jsRepeatedExtAddin <- function(nfactor.limit = 20, max.filesize = 2048) {
           withLoader(DTOutput("table1"), type = "html", loader = "loader6"),
           wellPanel(
             h5("Normal continuous variables  are summarized with Mean (SD) and t-test(2 groups) or ANOVA(> 2 groups)"),
-            h5("Non-normal continuous variables are summarized with median [IQR or min,max] and kruskal-wallis test"),
+            h5("Non-normal continuous variables are summarized with median [IQR or min,max] and wilcox(2 groups)/kruskal-wallis(>3 groups) test"),
             h5("Categorical variables  are summarized with table")
           )
         )