csvファイルへのデータの追加とRの飾りつけR

Question

データをcsvファイルに追加していますが、列名を割り当てていますが、列名が適切に表示されません。私は以下のコードと出力を与えました。

setwd("C:Users/Data") 
    write.csv(c(), "Summary.csv") 

    L <- 10:15 
    T <- c(0.1, 0.2, 0.3, 0.4, 0.5, 0.6) 
    df1 <- data.frame(L, T) 
    names(df1) <- c("L", "T") 

    for(i in 1:dim(df1)[1]){ 

     temp_d1 <- df1[i, ] 

      if (i == 1){ 
    write.table(temp_d1, file="Summary.csv", append=TRUE, col.names = TRUE,sep = ',') 
    }else{ 

    write.table(temp_d1, file="Summary.csv", append=TRUE, col.names = FALSE,sep = ',') 

      } 

} 

以下はSummary.csvファイルの出力です。なぜ最初の追加の列1：6がcsvに表示されているのかわかりません。理想的には、 "L"はカラム10:15に、 "T"は0.1：0.6にするべきですが、期待通りのものではありません。正しくラベルを貼るように助言してください。

L T 
1 10 0.1 
2 11 0.2 
3 12 0.3 
4 13 0.4 
5 14 0.5 
6 15 0.6 

Answer 1

デフォルトでは、write.tableは、各行に行の名前または番号を追加します。これを止めるには、をwrite.tableステートメントに追加します。