message(paste0('Datetime: ',Sys.Date(),':',Sys.time())) #> Datetime: 2026-10-09:2026-10-09 08:45:49.463712
library(repfun)
df <- data.frame(tt_ac01=c('1','2','3'), tt_ac02=c('a','b','b'), tt_ac03=c('10','11','12')) repfun::ru_expvarlist(df, varsin="tt_ac:") #> [1] "tt_ac01" "tt_ac02" "tt_ac03"
df <- data.frame(tt_ac01=c('1','2','3'), tt_ac03=c('10','11','12')) repfun::ru_expvarlist(df, varsin="tt_ac:") #> [1] "tt_ac01" "tt_ac03"
df <- data.frame(tt_ac01=c('1','2','3'), tt_ac03=c('10','11','12')) repfun::ru_expvarlist(df, varsin="tt_ac01-tt_ac10") #> [1] "tt_ac01" "tt_ac03"