pre slots calculate for caac

path <- r"(C:/Users/zhang/Documents/WeChat Files/wxid_1219792197912/FileStorage/File/2022-03/S22红头/S22红头)" library(tidyr) setwd(path) pre <- list.files(path,'二.+xls') %>%
{l <- map(.,~readxl::read_xls(.,col_types = 'text'));setNames(l,.)} %>%
bind_rows(.id = 'source') %>%
filter(FD23!=FD24)

pre_fix <- pre %>%
{list(
select(.,1:4,FD4,FD5,FD21,FD26),
select(.,1:4,FD7,FD6,FD21,FD26),

pre slots calculate for caac最先出现在Python成神之路。