Nothing
knitr::opts_chunk$set( collapse = TRUE, comment = "#>", fig.width = 7, fig.height = 4.2, dpi = 120 ) library(tatooheene) library(dplyr)
tatooheene::df_fp.friction_period() to:The function is
r lifecycle::badge("experimental"). Column names reflect the CBS table embedded indf_fp.
df_fp %>% select(Year, `Friction period in days`, `Friction period days average over 5 years`, `Friction period in weeks`, `Friction period weeks average over 5 years`) %>% head()
tatooheene::friction_period()
tatooheene::friction_period(year = 2019, units = "weeks", avg = "5yr", output = "value")
tatooheene::friction_period(year = 2018:2020, units = "days", avg = "1yr")
tatooheene::friction_period( year = 2015:2019, units = c("days", "weeks"), avg = "1yr" # try c("1yr","5yr") to get four columns )
"Year out of range …"\
You asked for a year outside range(df_fp$Year). Use a valid year or pass NULL for all years.
"For output = "value", provide exactly one year and a single (units, avg) combination."\
Single value mode needs exactly one year and one (units, avg).
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.