w <- matrix(1:20, 10, 2)
x <- 1:10
y <- factor(rep(c('a', 'b'), 5))
z <- letters[1:10]
w[1,1] <- NA
x[3] <- NA
y[5] <- NA
z[7] <- NA
all.good(w, x, y, z)
## [1] FALSE TRUE FALSE TRUE FALSE TRUE FALSE TRUE TRUE TRUE
Run the code above in your browser using DataLab