setwd("XXX") f<-list.files("XXX", pattern="txt$") print(f) j = 1 for(i in f) { dat <-read.table(paste("XXX", i, sep = ""), header = T) assign(paste("dat",j,sep=""),dat) j = j + 1 } # 50,000 x 300 x 8 のデータで読み込みに20分。XXXは適切なデ…

■Linuxの頻出コード ・passwd パスワードの変更 ・cd /パス名 - cdのみ home ディレクトリに戻る - cd - 1つ前のディレクトリに移動 ・相対パス表現 - . (ドット１個） カレントディレクトリ - .. (ドット２個） カレントディレクトリの親ディレクトリ - ~ (…