# For TALIS2018 # K.RIN # #ライブラリ読み込み library(tidyverse) library(haven) install.packages("labelled") #データファイル読み込み ATGINTT3 <- read_sav("ATGINTT3.sav") question_items <- read_csv("ATGINTT3_Q.csv", col_names = TRUE, col_types = list(col_character(), col_character(), col_character())) answer_items <- read_csv("ATGINTT3_A.csv", col_names = TRUE, col_types = list(.default = col_character(), items_count = col_character())) country_code <- read_csv("ISO3166.csv", col_names = TRUE, col_types = list(col_character(), col_character(), col_character(), col_character()))