javascript中的日期时间，日期设置和警报

Question

我想根据传入的日期值发出警告。例如，如果是星期一，则不应在星期一 14:00 之后注册。在我的警告下，他每天14:00后都不注册。如何将日期信息添加到条件中，使其不在当天内记录？

library(purrr)

lst <- c(4, 8, 12, 16)

map(lst, function(x){

  if (x > 14) {
    min <-  0.005
  } else if (x > 10) {
    min <-  0.025
  } else if (x >= 5) {
    min <-  0.05 
  } else {
    min <-  0.1
  }
  
  avg <- 1/x
  max <- avg + (avg - min) 
  
  DF <- (seq(max, min, length.out = x))

  results <- setNames(list(x, min,max,avg,DF), c('x','min', 'max', 'avg', 'DF'))
  return(results)
})


#-----
[[1]]
[[1]]$x
[1] 4

[[1]]$min
[1] 0.1

[[1]]$max
[1] 0.4

[[1]]$avg
[1] 0.25

[[1]]$DF
[1] 0.4 0.3 0.2 0.1

[[2]]
[[2]]$x
[1] 8
...