data-raw/na_test.R

library(readxl)
df <- read_excel("data-raw/计提数据模版.xlsx", 
                 col_types = c("text", "text", "text", 
                               "text", "text", "numeric", "numeric", 
                               "numeric", "text", "text", "text", 
                               "text", "text", "text", "numeric", 
                               "numeric", "text", "text", "text", 
                               "numeric", "date", "numeric"))
View(df)


df =  as.data.frame(df)


class(df$日期)

df2 = tsdo::na_standard(df)

View(df2)

df2
takewiki/tsdo documentation built on July 5, 2023, 10:57 p.m.