pxmake (version 0.17.0)

px_note: NOTE

Description

Inspect or change NOTE.

Usage

px_note(x, value, validate)
# S3 method for px
px_note(x, value, validate = TRUE)

Value

A px object, a character string, a data frame, or a list of character strings and/or data frames.

Arguments

x

A px object

value

Optional. A character string, a data frame, or a list.

• Use character, to set NOTE for the entire table across all languages.

• Use a data frame with columns 'language' and 'value' to set NOTE for the entire table in a specific language.

• Use a data frame with the columns 'variable-code' and 'note', to set NOTE for a specific variable across all languages. Add the column 'language' to set NOTE for specific language.

• Use a list of the above elements to set NOTE in muliple ways. This is the same as calling NOTE multiple times with different values.

• If missing, the current NOTE is returned.

• If NULL, NOTE is removed for the table and all variables.

validate

Optional. If TRUE a number of validation checks are performed on the px object, and an error is thrown if the object is not valid. If FALSE, the checks are skipped, which can be usefull for large px objects where the check can be time consuming. Use px_validate() to manually preform the check.

Details

NOTE has a lot of possible ways to specify value, because it can be set both for the entire PX-file and for individual variables.

See Also

Statistics Sweden's documentation

Examples

library(tibble)

# Set NOTE for entire PX-file
x1 <-
  px(population_gl) |>
  px_note('Note about PX-file')

# Print NOTE
px_note(x1)

# Set NOTE for entire PX-file in multiple languages
x2 <-
  x1 |>
  px_languages(c('en', 'kl')) |>
  px_note(tribble(~language,            ~value,
                       'en',    'English note',
                       'kl', 'Kalaallisut note'
                 )
         )
px_note(x2)

# Set NOTE for variables
x3 <-
  x1 |>
  px_note(tribble(~`variable-code`, ~note,
                 'year', 'Some data collected in following year',
                 'age',  'Is rounded down'
                 )
        )
px_note(x3)

# Remove all NOTEs
x4 <- px_note(x3, NULL)