合并列及拆分列,向下填充NA
df03 <- billboard[,3]
separate(data = df03,
col = date.entered,
into = c("year", "month", "day"),
sep = "\\-",
remove = F) -> df04
df04
unite(data = df04,
col = date,
year, month, day,
sep = "/")
df05 <- read_xlsx('./Documents/批号价格.xlsx',sheet = 2)
df05 %>%
fill(c(企业名称,批号,`价格/剂(元)`),.direction='down') %>%
unite(col = id,企业名称,批号,sep='-')
评论
发表评论