如何根據列是否全部為數字（但采用字符格式）將整列轉換為數字？

Question

我有一個非常大的數據集，有很多列，所以我不想手動將每一列從字符轉換為數字，而是想自動完成。 由於列中的值是“0”、“1”、“2”...“9”，（“1”到“9”），我想象某種循環遍歷每一列，檢查是否該列全部為“0”、“1”、“2”...或“9”，然后將它們全部轉換為數字。

做這個的最好方式是什么？

Answer 1

如果所有列值都是數字，則可以將值轉換為數字。

df[] <- lapply(df, function(x) if(all(grepl('^\\d+$', x))) as.numeric(x) else x)

使用dplyr -

library(dplyr)

df <- df %>% mutate(across(where(~all(grepl('^\\d+$', .x))), as.numeric)) 

Answer 2

使用base R 。 我們不需要任何正則表達式 - 這可以使用type.convert自動轉換為數字類型

df <- type.convert(df, as.is = TRUE)