我正在使用具有各种列类的数据集,包括类“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)