if (FALSE) {
board <- board_kaggle_competitions()
board
board %>% pin_meta("titanic")
paths <- board %>% pin_download("titanic")
paths
head(read.csv(paths[[1]]))
head(read.csv(paths[[2]]))
}
if (FALSE) {
board <- board_kaggle_dataset()
board %>% pin_search("cats")
board %>% pin_exists("rturley/pet-breed-characteristics")
board %>% pin_meta("rturley/pet-breed-characteristics")
board %>% pin_versions("rturley/pet-breed-characteristics")
board %>% pin_versions("imsparsh/animal-breed-cats-and-dogs")
}
Run the code above in your browser using DataLab