假设我有一组动物园数据与{0,1}集合中的信号。 例如 a b c
Oct 2005 1 0 1
Nov 2005 0 1 1
Dec 2005 0 1 0
Jan 2006 1 0 0
Feb 2006 1 1 0
Mar 2006 0 0 1
Apr 2006 0 0 1
May 2006 0 1 1
Jun 2006 1 1 0
Jul 2006 0 1 1
Aug
我试图在R中创建一个干净的函数来返回TRUE/FALSE,如果一个POSIXlt时间向量在早晨高峰时间,也就是周一早上7.30到9.30到星期五。这是我迄今为止所做的,但似乎有点漫长而复杂。是否有可能在保持代码本身可读性的同时进行改进? library(lubridate)
morning.rush.hour <- function(tm) {
# between 7.30am an