修改了部分功能的描述

radiant.basics/inst/app/init.R

@@ -2,7 +2,7 @@
 r_url_list <- getOption("radiant.url.list")
 r_url_list[["Single mean"]] <-
   list("tabs_single_mean" = list("Summary" = "basics/single-mean/", "Plot" = "basics/single-mean/plot/"))
-r_url_list[["Compare means"]] <-
+r_url_list[["Compare means(t-test/Wilcoxon rank-sum test)"]] <-
   list("tabs_compare_means" = list("Summary" = "basics/compare-means/", "Plot" = "basics/compare-means/plot/"))
 r_url_list[["Single proportion"]] <-
   list("tabs_single_prop" = list("Summary" = "basics/single-prop/", "Plot" = "basics/single-prop/plot/"))
@@ -10,7 +10,7 @@ r_url_list[["Compare proportions"]] <-
   list("tabs_compare_props" = list("Summary" = "basics/compare-props/", "Plot" = "basics/compare-props/plot/"))
 r_url_list[["Goodness of fit"]] <-
   list("tabs_goodness" = list("Summary" = "basics/goodness/", "Plot" = "basics/goodness/plot/"))
-r_url_list[["Cross-tabs"]] <-
+r_url_list[["Cross-tabs(Chi-square test, etc)"]] <-
   list("tabs_cross_tabs" = list("Summary" = "basics/cross-tabs/", "Plot" = "basics/cross-tabs/plot/"))
 r_url_list[["Correlation"]] <-
   list("tabs_correlation" = list("Summary" = "basics/correlation/", "Plot" = "basics`/correlation/plot/"))
@@ -34,7 +34,7 @@ options(
         tabPanel(i18n$t("Central Limit Theorem"), uiOutput("clt")),
         "----", i18n$t("Means"),
         tabPanel(i18n$t("Single mean"), uiOutput("single_mean")),
-        tabPanel(i18n$t("Compare means"), uiOutput("compare_means")),
+        tabPanel(i18n$t("Compare means(t-test/Wilcoxon rank-sum test)"), uiOutput("compare_means")),
         tabPanel(i18n$t("Normality test"),uiOutput("normality_test")),
         tabPanel(i18n$t("Homogeneity of variance test"),uiOutput("homo_variance_test")),
         "----", i18n$t("Proportions"),
@@ -42,7 +42,7 @@ options(
         tabPanel(i18n$t("Compare proportions"), uiOutput("compare_props")),
         "----", i18n$t("Tables"),
         tabPanel(i18n$t("Goodness of fit"), uiOutput("goodness")),
-        tabPanel(i18n$t("Cross-tabs"), uiOutput("cross_tabs")),
+        tabPanel(i18n$t("Cross-tabs(Chi-square test, etc)"), uiOutput("cross_tabs")),
         tabPanel(i18n$t("Correlation"), uiOutput("correlation"))
       )
     )

radiant.basics/inst/app/tools/analysis/compare_means_ui.R

@@ -226,7 +226,7 @@ output$compare_means <- renderUI({
 
   stat_tab_panel(
     menu = i18n$t("Basics > Means"),
-    tool = i18n$t("Compare means"),
+    tool = i18n$t("T-test/Wilcoxon rank-sum test"),
     tool_ui = "ui_compare_means",
     output_panels = cm_output_panels
   )

radiant.basics/inst/app/tools/analysis/cross_tabs_ui.R

@@ -119,7 +119,7 @@ output$cross_tabs <- renderUI({
 
   stat_tab_panel(
     menu = i18n$t("Basics > Tables"),
-    tool = i18n$t("Cross-tabs"),
+    tool = i18n$t("Cross-tabs(Chi-square test, etc)"),
     tool_ui = "ui_cross_tabs",
     output_panels = ct_output_panels
   )