如何使用 tidyverse 將數字（char）轉換為數字（數字）

Question

下面是一個例子。 共有三列，其中兩列包含數字，但都是字符。

我希望使用 tidyverse 自動將數字（字符）轉換為數字（數字）。

實際數據有 100 多列，全部為 char，但它包含幾列有值。

library(tidyverse)

tbl <- tibble(x = c("1", "2"),
              y = c("a", "b"),
              z = c("3", "4")
)

Answer 1

我們可以用

tbl |> mutate(across(.fns = ~ if(all(!is.na(as.numeric(.x)))) as.numeric(.x) else .x))

• output

# A tibble: 2 × 3
      x y         z
  <dbl> <chr> <dbl>
1     1 a         3
2     2 b         4

Answer 2

type.convert(tbl, as.is =TRUE)

# A tibble: 2 x 3
      x y         z
  <int> <chr> <int>
1     1 a         3
2     2 b         4