Remove dependence of emo, remove replacing asterisk by emoji's star; …

…remove patchlevel from R dependence

DESCRIPTION

@@ -32,7 +32,7 @@ LazyData: TRUE
 URL: https://github.com/irudnyts/estudy2, https://irudnyts.github.io/estudy2/
 BugReports: https://github.com/irudnyts/estudy2/issues
 Depends:
-    R (>= 4.1.1)
+    R (>= 4.1)
 Imports:
     quantmod (>= 0.4.18),
     zoo (>= 1.8.9),
@@ -53,8 +53,6 @@ Suggests:
     stringr (>= 1.4.0),
     magrittr (>= 2.0.1),
     formattable (>= 0.2.1),
-    dplyr (>= 1.0.7),
-    emo
-Remotes: github::hadley/emo
+    dplyr (>= 1.0.7)
 VignetteBuilder: knitr
 Encoding: UTF-8

R/run_app.R

@@ -13,7 +13,7 @@ run_app <- function() {
 
     packages <- c(
         "curl", "shiny", "shinyFeedback", "shinyWidgets", "DT", "bslib",
-        "stringr", "magrittr", "formattable", "dplyr", "emo"
+        "stringr", "magrittr", "formattable", "dplyr"
     )
 
     purrr::walk(packages, check_installation)

inst/app/helpers.R

@@ -87,8 +87,8 @@ sign_formatter <- formattable::formatter(
 #' Beautify the result of \code{parametric_tests()} and
 #' \code{nonparametric_tests()}
 #'
-#' The function beautifies the column names, formats percent columns, rounds
-#' to the second digit, and replaces asterisks by emojis' stars.
+#' The function beautifies the column names, formats percent columns, and rounds
+#' to the second digit.
 beautify <- function(tests_table) {
 
     # beautify column names
@@ -112,12 +112,6 @@ beautify <- function(tests_table) {
                 2
             )
         ) %>%
-        dplyr::mutate(
-            dplyr::across(
-                dplyr::contains("Signif"),
-                stringr::str_replace_all, stringr::fixed("*"), emo::ji("star")
-            )
-        ) %>%
         dplyr::mutate(
             Percent = formattable::percent(Percent / 100, digits = 0),
             Date = format(Date, "%b %d")