我正在关注Rbloggers中的一个教程并发现使用双冒号,我在线查看,但我找不到他们使用的解释.这是他们使用的一个例子.
df <- dplyr::data_frame(
year = c(2015, NA, NA, NA),
trt = c("A", NA, "B", NA)
)
Run Code Online (Sandbox Code Playgroud)
我知道它会创建一个数据框,但我不明白它们的用途.
我写了这个我一直用的功能:
# Give the previous day, or Friday if the previous day is Saturday or Sunday.
previous_business_date_if_weekend = function(my_date) {
if (length(my_date) == 1) {
if (weekdays(my_date) == "Sunday") { my_date = lubridate::as_date(my_date) - 2 }
if (weekdays(my_date) == "Saturday") { my_date = lubridate::as_date(my_date) - 1 }
return(lubridate::as_date(my_date))
} else if (length(my_date) > 1) {
my_date = lubridate::as_date(sapply(my_date, previous_business_date_if_weekend))
return(my_date)
}
}
Run Code Online (Sandbox Code Playgroud)
当我将其应用于具有数千行的数据帧的日期列时出现问题.这太慢了. 有什么想法为什么?