Correcting typos found in html diagnosis report, and if also detected…

… in other files. Job Informations > Job Information. Other levles > Other levels. Recommend > Recommendation. Distirubution > Distribution. Files in dlookr/docs/articles/ were not updated.
choonghyunryu · May 29, 2024 · 057852f · 057852f
1 parent 566bcda
commit 057852f
Show file tree

Hide file tree

Showing 35 changed files with 67 additions and 67 deletions.
diff --git a/R/html_diagnose.R b/R/html_diagnose.R
@@ -60,7 +60,7 @@ html_toprank <- function(.data, variable = NULL, drop_variable = FALSE) {
     summarise(top_freq = sum(freq), .groups = "drop") %>% 
     mutate(other_freq = N - top_freq) %>% 
     filter(other_freq > 0) %>% 
-    mutate(levels = "Other levles",
+    mutate(levels = "Other levels",
            N = N,
            freq = other_freq,
            ratio = freq / N,
@@ -85,7 +85,7 @@ html_toprank <- function(.data, variable = NULL, drop_variable = FALSE) {
   # Render a bar chart in the background of the cell
   bar_style <- function(width = 1, fill = "#e6e6e666", levels = NULL) {
     fill <- ifelse(levels %in% "Missing", "#cdcdcd99", fill)
-    fill <- ifelse(levels %in% "Other levles", "#0072bc66", fill)
+    fill <- ifelse(levels %in% "Other levels", "#0072bc66", fill)
 
     position <- paste0(width * 100, "%")
     image <- sprintf("linear-gradient(90deg, %1$s %2$s, transparent %2$s)", 
@@ -152,7 +152,7 @@ html_paged_toprank <- function(.data, top = 10, type = "n", variable = NULL,
     summarise(top_freq = sum(freq), .groups = "drop") %>% 
     mutate(other_freq = N - top_freq) %>% 
     filter(other_freq > 0) %>% 
-    mutate(levels = "Other levles",
+    mutate(levels = "Other levels",
            N = N,
            freq = other_freq,
            ratio = freq / N,
@@ -540,7 +540,7 @@ html_missing <- function(tab, grade = c("Good" = 0.05, "OK" = 0.1,
       diagn_missing,
       defaultColDef = colDef(style = "font-size: 14px;color: hsl(0, 0%, 40%);"),
       columns = list(
-        variables = colDef(name = "Variables"),  
+        variables = colDef(name = "Variable"),  
         missing_count = colDef(name = "Missing",
                                width = 120,
                                format = colFormat(separators = TRUE)),    
@@ -560,7 +560,7 @@ html_missing <- function(tab, grade = c("Good" = 0.05, "OK" = 0.1,
                           tagList(badge, value)
                         }),
         recommend = colDef(
-          name = "Recommend"
+          name = "Recommendation"
         )
       )
     )
@@ -730,7 +730,7 @@ html_outlier <- function(.data, theme = c("orange", "blue")[1],
         height = 400, device = grDevices::png)
 
         shiny::tabsetPanel(
-          shiny::tabPanel("Distirubution", p_outlier,
+          shiny::tabPanel("Distribution", p_outlier,
                           hr(style = "border-top: 1px solid black;"),
                           style = "padding-top:5px; padding-bottom:25px;"),          
           shiny::tabPanel("Statistics", outlier_df,

diff --git a/R/report.R b/R/report.R
@@ -45,7 +45,7 @@ eda_paged_report <- function(.data, ...) {
 #'     \itemize{
 #'       \item Data Structures
 #'       \item Data Types
-#'       \item Job Informations
+#'       \item Job Information
 #'     }
 #'     \item Warnings
 #'     \item Variables
@@ -276,7 +276,7 @@ diagnose_web_report.data.frame <- function(.data, output_file = NULL, output_dir
 #'   \item Overview
 #'   \itemize{
 #'     \item Data Structures 
-#'     \item Job Informations
+#'     \item Job Information
 #'     \item Warnings
 #'     \item Variables
 #'   } 
@@ -602,7 +602,7 @@ diagnose_paged_report.data.frame <- function(.data, output_format = c("pdf", "ht
 #'   \itemize{
 #'     \item Data Structures 
 #'     \item Data Types
-#'     \item Job Informations
+#'     \item Job Information
 #'   }
 #'   \item Univariate Analysis
 #'   \itemize{
@@ -847,7 +847,7 @@ eda_web_report.data.frame <- function(.data, target = NULL, output_file = NULL,
 #'   \item Overview
 #'   \itemize{
 #'     \item Data Structures 
-#'     \item Job Informations
+#'     \item Job Information
 #'   } 
 #'   \item Univariate Analysis
 #'   \itemize{
@@ -1141,7 +1141,7 @@ eda_paged_report.data.frame <- function(.data, target = NULL, output_format = c(
 #'   \itemize{
 #'     \item Data Structures 
 #'     \item Data Types
-#'     \item Job Informations
+#'     \item Job Information
 #'   }
 #'   \item Imputation
 #'   \itemize{
@@ -1353,7 +1353,7 @@ transformation_web_report <- function(.data, target = NULL, output_file = NULL,
 #'   \item Overview
 #'   \itemize{
 #'     \item Data Structures 
-#'     \item Job Informations
+#'     \item Job Information
 #'   } 
 #'   \item Imputation
 #'   \itemize{

diff --git a/R/report_tbl_dbi.R b/R/report_tbl_dbi.R
@@ -17,7 +17,7 @@
 #'     \itemize{
 #'       \item Data Structures
 #'       \item Data Types
-#'       \item Job Informations
+#'       \item Job Information
 #'     }
 #'     \item Warnings
 #'     \item Variables
@@ -161,7 +161,7 @@ diagnose_web_report.tbl_dbi <- function(.data, output_file = NULL, output_dir =
 #'   \item Overview
 #'   \itemize{
 #'     \item Data Structures 
-#'     \item Job Informations
+#'     \item Job Information
 #'     \item Warnings
 #'     \item Variables
 #'   } 
@@ -340,7 +340,7 @@ diagnose_paged_report.tbl_dbi <- function(.data, output_format = c("pdf", "html"
 #'   \itemize{
 #'     \item Data Structures 
 #'     \item Data Types
-#'     \item Job Informations
+#'     \item Job Information
 #'   }
 #'   \item Univariate Analysis
 #'   \itemize{
@@ -477,7 +477,7 @@ eda_web_report.tbl_dbi <- function(.data, target = NULL, output_file = NULL,
 #'   \item Overview
 #'   \itemize{
 #'     \item Data Structures 
-#'     \item Job Informations
+#'     \item Job Information
 #'   } 
 #'   \item Univariate Analysis
 #'   \itemize{

diff --git a/README.Rmd b/README.Rmd
@@ -903,7 +903,7 @@ The contents of the report are as follows.:
     + Data Structures
         + Data Structures
         + Data Types
-        + Job Informations
+        + Job Information
     + Warnings
     + Variables
 * Missing Values
@@ -978,7 +978,7 @@ The contents of the report are as follows.:
 
 * Overview
     + Data Structures
-    + Job Informations
+    + Job Information
     + Warnings
     + Variables
 * Missing Values
@@ -1078,7 +1078,7 @@ The contents of the report are as follows.:
 * Overview
     + Data Structures
     + Data Types
-    + Job Informations
+    + Job Information
 * Univariate Analysis
     + Descriptive Statistics
     + Normality Test
@@ -1145,7 +1145,7 @@ The contents of the report are as follows.:
 
 * Overview
     + Data Structures
-    + Job Informations
+    + Job Information
 * Univariate Analysis
     + Descriptive Statistics
         + Numerical Variables
@@ -1236,7 +1236,7 @@ The contents of the report are as follows.:
 * Overview
     + Data Structures
     + Data Types
-    + Job Informations
+    + Job Information
 * Imputation
     + Missing Values
     + Outliers
@@ -1296,7 +1296,7 @@ The contents of the report are as follows.:
 
 * Overview
     + Data Structures
-    + Job Informations
+    + Job Information
 * Imputation
     + Missing Values
     + Outliers

diff --git a/README.md b/README.md
@@ -2067,7 +2067,7 @@ The contents of the report are as follows.:
   - Data Structures
     - Data Structures
     - Data Types
-    - Job Informations
+    - Job Information
   - Warnings
   - Variables
 - Missing Values
@@ -2156,7 +2156,7 @@ The contents of the report are as follows.:
 
 - Overview
   - Data Structures
-  - Job Informations
+  - Job Information
   - Warnings
   - Variables
 - Missing Values
@@ -2273,7 +2273,7 @@ The contents of the report are as follows.:
 - Overview
   - Data Structures
   - Data Types
-  - Job Informations
+  - Job Information
 - Univariate Analysis
   - Descriptive Statistics
   - Normality Test
@@ -2349,7 +2349,7 @@ The contents of the report are as follows.:
 
 - Overview
   - Data Structures
-  - Job Informations
+  - Job Information
 - Univariate Analysis
   - Descriptive Statistics
     - Numerical Variables
@@ -2457,7 +2457,7 @@ The contents of the report are as follows.:
 - Overview
   - Data Structures
   - Data Types
-  - Job Informations
+  - Job Information
 - Imputation
   - Missing Values
   - Outliers
@@ -2527,7 +2527,7 @@ The contents of the report are as follows.:
 
 - Overview
   - Data Structures
-  - Job Informations
+  - Job Information
 - Imputation
   - Missing Values
   - Outliers

diff --git a/docs/index.html b/docs/index.html
diff --git a/docs/reference/diagnose_paged_report.data.frame.html b/docs/reference/diagnose_paged_report.data.frame.html
diff --git a/docs/reference/diagnose_paged_report.tbl_dbi.html b/docs/reference/diagnose_paged_report.tbl_dbi.html
diff --git a/docs/reference/diagnose_web_report.data.frame.html b/docs/reference/diagnose_web_report.data.frame.html
diff --git a/docs/reference/diagnose_web_report.tbl_dbi.html b/docs/reference/diagnose_web_report.tbl_dbi.html
diff --git a/docs/reference/eda_paged_report.data.frame.html b/docs/reference/eda_paged_report.data.frame.html
diff --git a/docs/reference/eda_paged_report.tbl_dbi.html b/docs/reference/eda_paged_report.tbl_dbi.html
diff --git a/docs/reference/eda_web_report.data.frame.html b/docs/reference/eda_web_report.data.frame.html
diff --git a/docs/reference/eda_web_report.tbl_dbi.html b/docs/reference/eda_web_report.tbl_dbi.html
diff --git a/docs/reference/transformation_paged_report.html b/docs/reference/transformation_paged_report.html
diff --git a/docs/reference/transformation_web_report.html b/docs/reference/transformation_web_report.html