taking out columns from a data frame