# NOT RUN {
dfm <- tibble(
w = c(NA, 1, 2),
x = 1:3,
y = as.character(1:3),
z = letters[1:3]
)
dfm
type_ensure(dfm, c("w", "x", "y"), "numeric")
type_ensure(dfm, c("w", "x", "y", "z"), "character")
# }
Run the code above in your browser using DataLab