feat: new string split function to allow splitting string into rows or columns. select from allowed delimiters.

This commit is contained in:
Andreas Gammelgaard Damsbo 2025-10-30 14:49:38 +01:00
commit 48f4d99429
No known key found for this signature in database
5 changed files with 404 additions and 4 deletions

View file

@ -99,7 +99,7 @@ ui_elements <- function(selection) {
import_globalenv_ui(
id = "env",
title = NULL,
packages = c("NHANES", "stRoke", "datasets")
packages = c("NHANES", "stRoke", "datasets", "MASS")
)
),
# shiny::conditionalPanel(
@ -268,7 +268,7 @@ ui_elements <- function(selection) {
shiny::tags$br(),
shiny::fluidRow(
shiny::column(
width = 4,
width = 3,
shiny::actionButton(
inputId = "modal_update",
label = i18n$t("Reorder factor levels"),
@ -280,7 +280,7 @@ ui_elements <- function(selection) {
shiny::tags$br()
),
shiny::column(
width = 4,
width = 3,
shiny::actionButton(
inputId = "modal_cut",
label = i18n$t("New factor"),
@ -292,7 +292,19 @@ ui_elements <- function(selection) {
shiny::tags$br()
),
shiny::column(
width = 4,
width = 3,
shiny::actionButton(
inputId = "modal_string",
label = i18n$t("Split text"),
width = "100%"
),
shiny::tags$br(),
shiny::helpText(i18n$t("Split a text column by a custom delimiter.")),
shiny::tags$br(),
shiny::tags$br()
),
shiny::column(
width = 3,
shiny::actionButton(
inputId = "modal_column",
label = i18n$t("New variable"),