ファイルを読み取って csv ファイルとして保存する次のコードがあります。最初の 2 列だけが必要なので、テキスト ファイルの最初の 7 行と 3 列目を削除します。
current_file <- paste("Experiment 1 ",i,".cor",sep="")
curfile <- list.files(pattern = current_file)
curfile_data <- read.table(curfile, header=F,skip=7,sep=",")
curfile_data <- curfile_data[-grep('V3',colnames(curfile_data))]
write.csv(curfile_data,curfile)
new_file <- paste("Dev_C",i,".csv",sep="")
new_file
file.copy(curfile, new_file)
このように、curfile は最初に観測番号列とともに 2 つの列変数 V1 と V2 を保持します。
file.copy を使用して curfile の内容を .csv ファイルにコピーし、新しい .csv ファイルを Excel で開くと、すべてのデータが連結されて 1 つの列に表示されるように見えますが、表示する方法はありますか個々の列を個別に？ご提案いただきありがとうございます。
.txt ファイル内のデータは次のようになります。
"","V1","V2","V3"
"1",-0.02868862,5.442283e-11,76.3
"2",-0.03359281,7.669754e-12,76.35
"3",-0.03801883,-1.497323e-10,76.4
"4",-0.04320051,-6.557672e-11,76.45
"5",-0.04801207,-2.557059e-10,76.5
"6",-0.05325544,-9.986231e-11,76.55