## Not run:
# data(iris)
# dat <- data.frame(
# date = rep(as.Date("2014-01-01"),10),
# num = c(rep(1,8),999,"n/a"),
# name = c("NULL","naa",rep("foo",8))
# )
# test_NA(dat)
# correct_NA(dat,custom_NAs="naa")
# ## End(Not run)
Run the code above in your browser using DataLab