Data Science Concept Maps 교육을 위한 개념 지도(concept map)가 공개되었다. 이를 통해 각자 데이터 과학 주요 개념을 머리속에 어떻게 각자 넣고 있는지 살펴볼 수 있는 수중한 자료가 아니까 싶다.
library(tidyverse)
library(slickR)
concept_files <- list.files(path ="fig/concept_map/")
concept_path_files <- glue::glue("fig/concept_map/{concept_files}")
concept_df <- tibble(path_file = concept_path_files,
slide = glue::glue("slide_{1:length(concept_files)}"))
concept_num <- htmlwidgets::JS("function(slick,index) {
return '<a>'+(index+1)+'</a>';
}")
concept_opts <- settings(arrows = TRUE,
slidesToShow = 3,
slidesToScroll = 1,
centerMode = TRUE,
focusOnSelect = TRUE,
initialSlide = 0)
slickR(concept_df$path_file, height = 600) %synch%
(slickR(concept_df$path_file, height = 100) + concept_opts)