View source: R/server_filters.R
prep_df | R Documentation |
Prepares a dataframe based on provided filters and naming options
prep_df(
lFilters,
lValues_for_naming,
df,
color_var,
facet = "left",
facet_var = rlang::sym("VIS_Groep"),
facet_name_var = rlang::sym("VIS_Groep_naam")
)
lFilters |
List of filters to be applied on the dataframe. |
lValues_for_naming |
List of values used for naming. |
df |
Dataframe to be processed. |
color_var |
Variable used for coloring. |
facet |
Facet grid side ("left" by default). |
facet_var |
Variable used for facet grid ("VIS_Groep" by default). |
facet_name_var |
Variable used for facet grid naming ("VIS_Groep_naam" by default). |
This function collapses values from the naming list into a single string, removes null elements from the filter list, transforms filter list into elements suitable for filtering, applies filters, adds new columns, and casts var used as color to factor.
A prepared dataframe with applied filters and new columns.
df <- dplyr::tibble(
VIS_Groep = sample(c("Group1", "Group2", "Group3"), 100, replace = TRUE),
VIS_Groep_naam = sample(c("Name1", "Name2", "Name3"), 100, replace = TRUE),
var1 = sample(c("A", "B", "C"), 100, replace = TRUE),
var2 = rnorm(100),
color_var = sample(c("Red", "Blue", "Green"), 100, replace = TRUE)
)
lFilters <- list("A;var1")
lValues_for_naming = list("Name1;VIS_Groep_naam", "Name2;VIS_Groep_naam")
color_var = "color_var"
dfPrepared <- prep_df(lFilters, lValues_for_naming, df, color_var, facet = "right")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.