使用数据[data ==“”] < - NA的R日期列错误

我正在使用具有各种列类的数据集,包括类“Date”.我尝试按以下方式为此数据集中的所有空值分配NA:

data[data==""] <- NA

显然日期列在这里出现了一些问题,因为存在以下错误:

Error in charToDate(x) : 
character string is not in a standard unambiguous format

我真的不知道为什么会出现这个错误,因为日期列中没有空值,所以它不应该发生.日期列中的日期采用标准格式“%Y-%m-%d”.

这里有什么问题,我该如何解决?

最佳答案 您可以为“Date”类以外的列子集创建逻辑索引,并使用它来将”替换为NA

 indx <- sapply(data, class)!='Date'
 data[indx][data[indx]==''] <- NA

正是’Date’类正在创建问题.另一种选择是将数据转换为矩阵,以便所有列都是字符.

 data[as.matrix(data)==''] <- NA

或者@Frank建议(并使用替换)

 data[indx] <- lapply(data[indx],  function(x) replace(x, which(x==''), NA))

数据

 set.seed(49)
 data <- data.frame(Col1= sample(c('',LETTERS[1:3]), 10, replace=TRUE), 
      Col2=sample(c('',LETTERS[1:2]), 10, replace=TRUE), 
      Date=seq(as.Date('2010-01-01'),length.out=10, by='day'),
       stringsAsFactors=FALSE)
点赞