主页 / coding / 问题 / 78337015
Accepted
J K
Asked: 2024-04-17 03:45:41 +0800 CST

根据数据框中的特定值提取列名称[重复]

  • 772

我有以下数据：

my_data <- tribble(
  ~item1, ~item2,
  "car", "ferrari",
  "house", "3 bed",
  NA, "3"
)

我正在尝试提取其中存在“house”的列的名称

我努力了：

my_data %>%
mutate(across(everything(), ~str_detect(.x , "house")))

返回：

# A tibble: 3 × 2
  item1 item2
  <lgl> <lgl>
1 FALSE FALSE
2 TRUE  FALSE
3 NA    FALSE

这就是我陷入困境的地方，试图提取列“item1”，我尝试使用该函数any()，但将整个内容压缩为TRUE.

请寻找 dplyr/purrr 解决方案。谢谢。

2 个回答

  1. Best Answer

    使用select(where())：

    library(dplyr)

my_data %>%
  select(where(\(x) "house" %in% x)) %>%
  names()
# "item1"
    • 3

  2. 尝试这个：

    result <- my_data %>%
  pivot_longer(everything(), 
               names_to = "column_name", 
               values_to = "value") %>%
  filter(value == "house") %>%
  pull(column_name)



#output
    print(result)
    [1] "item1"
    • 1

相关问题