今日は規則性の無いデータに無闇に関数を作用させるだけの話。 なので、内容が無いよーうです。 > setwd("D:\\100_work\\data") > data<-read.csv("data.csv") > head(data) No Date One Two Three Four Five Six Option 1 1 2000/10/5 2 8 10 13 27 30 39 2…