比较运算：
逻辑运算：
逻辑运算种非的优先级最高，与次之，或最低，即：！（非） → &&（与） → ||（或）
记忆口诀：not（非） and(与） or（或）
运算规则
1）&&：当且仅当两个运算量的值都为"真"时，运算结果为"真"，否则为"假"。
2） || ：当且仅当两个运算量的值都为"假"时，运算结果为"假"，否则为"真"。
3） ! ：当运算量的值为"真"时，运算结果为"假"；当运算量的值为"假"时，运算结果为"真"。
例如，假定x=5，则(x>=0) &&(x<10)的值为"真"，(x<-1) || (x>5)的值为"假"。
udf_async_rbind <- function(path= "D:/R/oper_key_index/data/d_data/",name= "移网线上单" ,
Date_temp = format(Date_stemp,"%Y%m%d"), # 直接引用变量不执行,需加函数转为常量
Date_last_month_day = ymd("2021-08-31") , # 函数内变量名不要与外部变量名重复
Date_last_month_day1= ymd("2021-07-31") ,
cols=190 ){
x <- udf_DT(paste0(path,name,Date_temp,".xlsx") , 1 ,0)
y <- udf_DT(paste0(path,name,format(Date_last_month_day,"%Y%m%d"),".xlsx"),1,0)
z <- udf_DT(paste0(path,name,format(Date_last_month_day1,"%Y%m%d"),".xlsx"),1,0)
if(ncol(x)>70){
x <- x[,1:cols]
y <- y[,1:cols]
z <- z[,1:cols]}else{print("全列导入")}
setnames(y,names(x))
table <- rbind(x, y)
return(table)
}
mob_dev_2ilist <- udf_async_rbind( name = "移网线上单" )
