2013-04-26 62 views
2

我需要關於此主題的答案。我有我已經採用進口至R的文件夾中的多個文件:查找並替換列表中的缺失值R

temp = list.files(pattern="*.txt") 

myfiles = lapply(temp, read.delim) 

生成的文件上存儲爲List[110]工作區。所以他們在列表中有110個文件。每個文件都有幾個不同的列和行。

我的問題:我想用NA找到並替換-999.99M;找到'T','C','A','F'和'Y',從所有110個文件中刪除它們。

回答

2

+1使用lapply將所有數據集放入列表中。

如果我理解正確的話,你可以做替換以下:

myfiles <- lapply(myfiles, function(df) 
        data.frame(lapply(df, function(x) { 
          if(is.numeric(x)) 
           x[x == -999.99] <- NA 
          else x[x %in% c('T','C','A','F','Y')] <- NA 
          x 
        }) 
      )