0

指定された形式 (以下の dateFormat) と一致しない値を空白のデータ フレームに関数で返しますas.Daterbind現在、それらはすべて に変換されNAます。データフレームに出力するだけで、まったく変換したくありません。as.Dateその時点で機能を短絡する方法を知っている人はいますか?

dataValues = data.frame(id = c("a1", "a2", "a4", "a5", "a6","a7", "a8", "a9", "a10",  "a11", "a12","a13", "a14", "a15", "a16", "a17"),
                        value1 = c('10/3/2012', '13/4/2012', NA, '0', '1/2/2012', '2/30/2013',
                        '2/4/2012', "N/A", 'No Data', '5-6-2012', '2/5/2012',
                        'Not Applicable', '5/8/2013', '2/5/2014', '6/9/2010', '5/4/2014'),
                        stringsAsFactors =  FALSE)
dateFormat = "%m/%d/%Y"
dates = toString(dataValues[,2])
tempSplit = unlist(strsplit(dates,","))            
#If it encounters anything that is not valid for the format
#such as out of range or incorrect format it will change the value
#to NA in the data frame. 
dates = as.data.frame(as.Date(tempSplit, dateFormat))
names(dates) = c("Date")
4

1 に答える 1