## code to prepare `NAME_OF_DATA_SET` dataset goes here

NAME_OF_DATA_SET <- list(
LIST_PRINTS
)

library(janitor)
NAME_OF_DATA_SET <- lapply(NAME_OF_DATA_SET, clean_names)

library(pins)
library(here)

board <- board_folder(here("pkgdown/assets/pins-board"), versioned = FALSE)
board |> pin_write(NAME_OF_DATA_SET, "NAME_OF_DATA_SET", type = "rds")
board |> write_board_manifest()
