评估多种条件

Question

我想知道是否有更好的方法来评估所有条件是否正确：

lapply(1:5, function(a){
  assign(paste0("a",a),a,envir =globalenv())
})

isTRUE(a1<a2 & a2<a3 & a3<a4 & a4<a5)

上述工作，但我想知道是否有更好，更简洁的方法来确定它。我正在寻找一种方法，我不必输入所有变量（a1，a2等），并且可以检查矢量/列表是否按升序排列。虽然我在这里给出了变量值的整数，但我们的想法是检查日期。

这样的东西？

isTRUE(a1<a2<a3<a4<a5)
# Or
ll<-list(a1,a2,a3,a4,a5)
is.ordered(ll)

## I think this works!
ll<-c(a2,a1,a3,a4,a5)

ll<-c(a1,a2,a3,a4,a5)
ordering<-order(ll)
all(ll==ll[ordering])