R语言 挑出dataframe中全是数字的列