विश्वसनीय तरीका अगर एक data.frame में एक स्तंभ is.POSIXct

Question

आर is.vector है, पता लगाने के लिए is.list, is.integer, is.double, is.numeric, is.factor, is.character, आदि क्यों नहीं is.POSIXct, is.POSIXlt या is.Date है?

मुझे POSIXct ऑब्जेक्ट का पता लगाने के लिए एक विश्वसनीय तरीका चाहिए, और class(x)[1] == "POSIXct" वास्तव में लगता है ... गंदा।

Answer 1

मैं व्यक्तिगत रूप से सिर्फ प्रयोग करेंगे inheritsjoran के रूप में सुझाव दिया। आप इसे अपने is.POSIXct फ़ंक्शन बनाने के लिए उपयोग कर सकते हैं।

# functions 
is.POSIXct <- function(x) inherits(x, "POSIXct") 
is.POSIXlt <- function(x) inherits(x, "POSIXlt") 
is.POSIXt <- function(x) inherits(x, "POSIXt") 
is.Date <- function(x) inherits(x, "Date") 
# data 
d <- data.frame(pct = Sys.time()) 
d$plt <- as.POSIXlt(d$pct) 
d$date <- Sys.Date() 
# checks 
sapply(d, is.POSIXct) 
# pct plt date 
# TRUE FALSE FALSE 
sapply(d, is.POSIXlt) 
# pct plt date 
# FALSE TRUE FALSE 
sapply(d, is.POSIXt) 
# pct plt date 
# TRUE TRUE FALSE 
sapply(d, is.Date) 
# pct plt date 
# FALSE FALSE TRUE 

Answer 2

lubridate पैकेज is.POSIXt, is.POSIXct, is.POSIXlt, और is.Date कार्य करती है।

Answer 3

आप is() आज़मा सकते हैं। यह lubridate फ़ंक्शंस is.Date और is.POSIX* वैसे भी भरोसा करता है।

x <- Sys.time() 
class(x) 
# [1] "POSIXct" "POSIXt" 
is(x, "Date") 
#v[1] FALSE 
is(x, "POSIXct") 
# [1] TRUE 

y <- Sys.Date() 
class(y) 
# [1] "Date" 
is(y, "POSIXct") 
# [1] FALSE 
is(y, "Date") 
# [1] TRUE