摘要: library(lubridate) d1 <- Sys.Date() as.numeric(d1) d2 <- "2000-02-29" d3 <- as.Date(d2) d4 <- now() year(d4) month(d4) week(d4) s1 <- sample(LETTERS[1 阅读全文
posted @ 2021-03-29 16:42 sinEagle 阅读(29) 评论(0) 推荐(0) 编辑