2014-06-19 55 views
0

我搜索了一段時間的解決方案,但沒有看到我可以工作的問題。基本上我有以下情況:重複給腳本添加新的ID

我把一個文件讀入一個名爲df1的數據幀中,這個數據幀有很多id(每個id可以在文件中80-120次),日期和數字數據。

我有一個腳本,做了一堆的caluclations,然後導出一個csv文件的標題作爲我已經創建的分類,下劃線,和像下面的id。每個文件只包含1個唯一的ID,但通常爲80+行。

write.table(df, 
      file = paste(unique(df$classification), "_", unique(df$id), ".csv"), 
      sep = ",", row.names = FALSE) 

我所希望做的是,在我的文件中讀取,得到獨特的表(我認爲這將是一個列表?)的ID值,然後送入的休息這一次編寫一個值。所以基本上,我會採用df1中的第一個唯一ID,將它提供給子集函數,執行一堆計算,然後導出文件。移至第二個唯一ID,將其送入子集,執行一堆計算,導出文件。沖洗並重復。這似乎微不足道,但我一直在努力尋找解決方案。任何幫助將不勝感激!

我假設我可以在下面的行之前放置一個循環,然後讓它遍歷整個腳本,每次都用一個新的id替換xxxxxxxxx?

df <- subset(df1, id == xxxxxxxxxxxxxxx) 

回答

0

如果我正確理解你的問題,你應該能夠遍歷這樣的:

for(i in unique(df1$id)){ 
    df <- df1[df1$id == i,] 
    ... 
}