Описание тега tidyeval
Используйте этот тег для вопросов об использовании аккуратной оценки в рамках tidyverse. Для получения дополнительной информации обратитесь к этому справочнику: https://tidyeval.tidyverse.org/
1
ответ
Разбор перегруженного столбца в фрейме данных - создание нескольких столбцов с помощью одного оператора mutate
У меня перегружен столбец, overloadedв кадре данных, содержащем такие значения, как 143 или же 23 или же 12789, df <- data_frame(id = 1:3, overloaded = c("145", "459", "2")) Я хочу разобрать этот столбец в 9 новых логических столбцов. df %>% m…
29 янв '19 в 07:56
1
ответ
Можно ли использовать энзимы на символьном векторе?
В следующем примере, почему я получаю ошибку или неожиданные результаты от использования энсимов для получения аргумента векторного символа? Я понимаю, что этот конкретный пример глуп: facet_grid() может фактически использовать символьный вектор в к…
01 фев '19 в 20:36
2
ответа
Функция lapply с аргументами для фрейма данных и переменной
У меня есть пользовательская функция, которая суммирует переменную. Я упростил функцию, чтобы проиллюстрировать мою проблему, т.е. она более сложна, чем показано ниже. Обратите внимание, что общая структура функции должна оставаться неизменной: она …
14 авг '17 в 11:46
1
ответ
Когда использовать rlang::ensym() вместо rlang::sym()?
Я могу видеть из документации, что rlang::enquo() а также rlang::quo() используются в разных контекстах. Следовательно, я использовал rlang::enysm() недавно в объявлении функции (см. ниже). Однако, завернувшись в другой вызов функции SE, я получил н…
10 мар '18 в 11:24
1
ответ
rlang::sym в анонимных функциях
Я недавно заметил, что rlang::sym кажется, не работает в анонимных функциях, и я не понимаю, почему. Вот пример, это довольно неуклюжий и уродливый, но я думаю, что это иллюстрирует require(tidyverse) data <- tibble(x1 = letters[1:3], x2 = letter…
17 авг '18 в 20:26
3
ответа
Использование dplyr `enquo` после вызова аргумента
У меня есть функция, которая примерно соответствует этой структуре: TestFunc <- function(dat, point) { if (!(point %in% c("NW", "SE", "SW"))) stop("point must be one of 'SW', 'SE', 'NW'") point <- enquo(point) return(dat %>% filter(point ==…
19 сен '17 в 20:39
1
ответ
Уровни факторов упорядочения с использованием tidyeval
У меня есть dataframe который выглядит так: my_df <- data.frame( x = c("V1", "V2", "V3", "V4"), score = c(1, 4, 6, 3), order = c(1, 4, 3, 2) ) Уровни my_df$x выглядеть так: > my_df$x [1] V1 V2 V3 V4 Levels: V1 V2 V3 V4 Я хочу иметь возможность…
11 сен '18 в 15:03
1
ответ
Накопление минимумов последующих переменных в одном столбце
С данными, как прикреплено, я хочу вытащить минимум выбранных столбцов и накапливать их в (Intercept) колонка. Остальные переменные должны быть разницей между исходным значением переменной и вычитаемым минимумом. Я написал функцию, которая делает эт…
31 окт '18 в 14:02
4
ответа
Как использовать enquo и quo_name в dplyr в функции с tidyr и ggplot2
library(dplyr) #Devel version, soon-to-be-released 0.6.0 library(tidyr) library(ggplot2) library(forcats) #for gss_cat data Я пытаюсь написать функцию, которая сочетает в себе цитаты из скоро, чтобы быть выпущенным dplyr версия devel вместе с tidyr:…
14 апр '17 в 05:43
1
ответ
Функции и проблемы с `View()`
Кодовый блок № 1 и № 2 идентичны, за исключением строки № 14. Кодовый блок № 1 использует print() Блок вызова и кода № 2 использует View() вызов. Кодовый блок № 1 работает нормально. Код блока № 2 выдает ошибку "Error in FUN(X[[i]], ...) : object 'c…
12 ноя '18 в 20:12
1
ответ
Преобразуйте строку выражения в выражение с кавычками
Как я могу преобразовать строку выражения в выражении в кавычках? Пример: это результат, который я хочу: mutate(mtcars,answer=wt+wt) # mpg cyl disp hp drat wt qsec vs am gear carb answer # 1 21.0 6 160.0 110 3.90 2.620 16.46 0 1 4 4 5.240 # 2 21.0 6…
10 янв '19 в 08:35
1
ответ
do.call форсирует оценку аргумента перед аккуратной оценкой Рланга
Я пытаюсь использовать фразы для хранения ссылок на объекты, над которыми я работаю. do.call нарушает идею, оценивая аргументы рано, поэтому в результате quosure хранит новую копию объекта, оцененную в empty_env()вместо реального вызова объекта. rla…
08 фев '19 в 13:48
1
ответ
Как я могу использовать Quasiquotation в контексте tidyeval в глаголах tidyverse scopded или картографе?
У меня проблемы с использованием специального оператора := (двоеточия) в функции отображения. Я нашел обходной путь, используя глагол scoped из tidyverse, но я хотел бы знать, каким образом специальный оператор реализован в функции отображения. По с…
08 фев '19 в 12:27
1
ответ
Quosures в R, как использовать! оператор (приборка-оценка)
Я пытаюсь понять аккуратную оценку в R. grouped_mean <- function(data, group_var, summary_var) { group_var <- enquo(group_var) summary_var <- enquo(summary_var) data %>% group_by(!!group_var) %>% summarise(mean = mean(!!summary_var)) …
13 фев '19 в 13:53
1
ответ
Создание списков с использованием инструментов tidyeval (например, `!!` и `:=`)
Я ищу способ легко list построение на основе R Tidyeval рамки, как это определено в rlang пакет. Вот что я хочу достичь: a <- "item_name" b <- "item_value" identical( list(!!a := !!b), # list(!!a := b) is of course also fine list(item_name = "…
22 сен '17 в 13:20
1
ответ
Аккуратная оценка при переименовании столбцов в dplyr
Я пытаюсь динамически переименовать один столбец в кадре данных, используя rename() с аккуратным синтаксисом оценки, выпущенным в dplyr v0.7.0. От ?rename На странице справки я нашел следующий пример для переименования 2 столбцов. library(dplyr) var…
24 сен '18 в 15:00
3
ответа
Использование as.formula с запятой
Я хотел бы получить условия динамически от пользователя, поэтому я создал блестящее приложение, которое получает их из поля ввода. Проблема в том, что as.formula не работает для вектора символов с запятой (без него работает нормально). Код: all_cond…
09 авг '18 в 08:43
1
ответ
Использование dplyr::quos() с аргументом списка вместо аргумента с многоточием
Я использую dplyr и пытаюсь создать функцию для вычисления p.values на основе группирования аргументов. Я хотел бы иметь аргумент, который будет список любой длины переменных для группировки. Вот пример набора данных: dataset <- structure(list(…
14 апр '18 в 00:03
1
ответ
Получить выражение, которое оценивается как точка в функции, вызываемой `magrittr`
У меня есть функция x_expression() который печатает выражение, переданное в аргумент x, pacman::p_load(magrittr, rlang) x_expression <- function(x) { print(enquo(x)) } y <- 1 x_expression(y) #> <quosure> #> expr: ^y #> env: glob…
28 авг '18 в 20:57
1
ответ
Несколько графиков для игнорирования цикла
Я пытаюсь сгенерировать 10 пар графиков с несколькими парами на страницу графиков, и я использую for цикл для построения пар. Однако графики отправляются на устройство в виде отдельных графиков, а не страниц. MWE ниже имеет идентичные конструкции дл…
19 июн '18 в 13:09