Remove columns from dataframe where some of values are NA

Question

I have a dataframe where some of the values are NA. I would like to remove these columns.

My data.frame looks like this

    v1   v2 
1    1   NA 
2           


        

Answer 1

data[,!apply(is.na(data), 2, any)]