Flat table with page from a pivot table with with thousands indicator and decimal numbers
Source:R/data.R
ft_set.Rd
Flat table with page from a pivot table with with thousands indicator and decimal numbers.
Examples
# Defined by:
f <- function(pt) {
pt |>
set_page(1, 1) |>
remove_top(1) |>
define_labels(n_col = 2, n_row = 2) |>
remove_k() |>
replace_dec() |>
fill_values() |>
fill_labels() |>
remove_agg() |>
unpivot()
}
pt <- pivot_table(df_set_h_v)
lpt <- pt |> divide()
ft_set <- flatten_table_list(lpt, f)