Jak uzyskać dostęp do istniejącej kolumny w mutate () ze zmienną łańcuchową [duplikat]

Jan 09 2021

Przeczytałem już Użyj dynamicznych nazw zmiennych w `dplyr`, ale moim problemem jest zmutowanie już istniejącej kolumny z nazwą kolumny przechowywaną jako zmienna łańcuchowa.

data <- tibble::tribble(
  ~colA, ~colB,
  1, 2,
  3, 4
)

namestring <- "colA"

----

> data
# A tibble: 2 x 2
   colA  colB
  <dbl> <dbl>
1     1     2
2     3     4

> namestring
[1] "colA"

Teraz chcę zmodyfikować colAusingnamestring

Poszukiwany wynik bez nazwy jest taki.

data %>%
  dplyr::mutate(colA = colB * 100)

## A tibble: 2 x 2
#   colA  colB
#  <dbl> <dbl>
#1   200     2
#2   400     4

Ale daje mi błąd podczas programowania dplyr

namestring <- "colA"
data %>%
  dplyr::mutate(.data[[namestring]] = colB + 2)

# Error: unexpected '=' in:
# "data %>%
#   dplyr::mutate(.data[[namestring]] ="

filteri selectnie generują tego samego rodzaju błędów, używając .data[[string]]na LHS

data %>%
  dplyr::filter(.data[[namestring]] == 3)

## A tibble: 1 x 2
#   colA  colB
#  <dbl> <dbl>
#1     3     4

Odpowiedzi

2 akrun Jan 09 2021 at 04:46

Możemy użyć :=z!!

library(dplyr)
data %>% 
    mutate(!! namestring := colB * 100)

-wynik

# A tibble: 2 x 2
#   colA  colB
#  <dbl> <dbl>
#1   200     2
#2   400     4    

Albo może być w środku across

data %>%
    mutate(across(all_of(namestring), ~ colB* 100))
# A tibble: 2 x 2
#   colA  colB
#  <dbl> <dbl>
#1   200     2
#2   400     4