Author

Haky Im

Published

January 1, 2000

Code
suppressMessages(library(tidyverse))
suppressMessages(library(glue))

PRE = "/Users/haekyungim/Library/CloudStorage/Box-Box/LargeFiles/imlab-data/data-Github/web-data"
SLUG="lego-database" ## copy the slug from the header
bDATE='2000-01-01' ## copy the date from the blog's header here
DATA = glue("{PRE}/{bDATE}-{SLUG}")
if(!file.exists(DATA)) system(glue::glue("mkdir {DATA}"))
WORK=DATA
##system(glue("open {DATA}")) ## this will open the folder 

downloads schema in /Users/haekyungim/Library/CloudStorage/Box-Box/LargeFiles/imlab-data/data-Github/web-data/2000-01-01-lego-database/downloads_schema.png

Code
parts = read_csv(glue("{DATA}/parts.csv"))
Rows: 25993 Columns: 3
── Column specification ────────────────────────────────────────────────────────
Delimiter: ","
chr (2): part_num, name
dbl (1): part_cat_id

ℹ Use `spec()` to retrieve the full column specification for this data.
ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.