# Set VALUENOTE for a value
library(tibble)
x1 <-
population_gl |>
px() |>
px_valuenote(
tribble(~`variable-code`, ~code, ~valuenote,
'year', '2004', 'Counts are approximated'))
# Print VALUENOTE
px_valuenote(x1)
# Set VALUENOTE for a value in specific language
x2 <-
x1 |>
px_languages(c('en', 'kl')) |>
px_valuenote(
tribble(~`variable-code`, ~code, ~language, ~valuenote,
'age', '0-6', 'en', 'Some of the figures are from 2003',
'age', '0-6', 'kl', 'Kisitsisit ilaat 2003-imeersuupput'))
px_valuenote(x2)
# Remove VALUENOTE
x3 <- px_valuenote(x2, NULL)
px_valuenote(x3)
Run the code above in your browser using DataLab