ようやく解析。ここからが楽しいRの時間ですね。まずはデータの概要を眺める。 # input file format: key name 200601 200602 200603 .... read.sy.data <- function(file){ d <- read.delim(file) n <- colnames(d) # make colnames: X200812 -> Dec 2008 c…