Drop columns with NA's in a list of data frames

Question

Consider a large list of data frames called GEER where some of the columns contain only NA. In R, how can I remove all columns containg NA