R function: Sys.time

now <- Sys.time()

now
# [1] "2015-09-02 10:40:54 CEST"

class(now)
# [1] "POSIXct" "POSIXt"