I have a data frame where some of the columns contain NA values.
How can I remove columns where all rows contain NA values?