Пакет dplyr представил оператор %.% для передачи левой части в качестве аргумента функции с правой стороны, подобно конвейеру *NIX. Пакет magrittr — гораздо более легкий пакет, который существует для определения только этого оператора, похожего...

Возьмите этот объект в качестве примера: expr <- substitute(mean(exp(sqrt(.)), .)) Это вложенный список. Я хочу найти все элементы, соответствующие quote(.) . Например, решение magrittr соответствует только первому уровню вызова:...

Я пытаюсь ответить, сколько полей в каждой строке меньше 5, используя pipe . В следующем виде это работает (без пайпа): rowSums( iris[,1:4] < 5 ) # works! Но попытка задать тот же вопрос с помощью трубы не работает: iris[1:5,1:4]...

Я хотел бы создать цепочку каналов magrittr для вызова вложенной функции ниже, которая дает точно такой же результат. Следующее возвращает фрейм данных со столбцами my_names и Freq . my_names <- c('John', 'Joe', 'Jane', 'John', 'John',...

Я только что заметил, что когда я вычитаю две даты друг из друга, а затем пытаюсь привести к числовому значению с помощью magrittr ( %>% ), я получаю дату, где, как если бы я просто заключал разницу дат в as.numeric() , я получаю разницу в...

Например, vim неправильно сделает отступ в следующем коде: flights <- flights %>% group_by(year, month, day) %>% select(arr_delay, dep_delay) %>% summarise( arr = mean(arr_delay, na.rm = TRUE), dep =...

Здесь происходит что-то действительно странное. В приведенном ниже коде я создаю переменную с именем temp . Я должен вызвать его дважды, прежде чем я смогу увидеть, что это такое. Например. При первом вызове консоль ничего не показывает. Во...

Я думал, что, вообще говоря, использование %>% не окажет заметного влияния на скорость. Но в этом случае он работает в 4 раза медленнее. library(dplyr) library(microbenchmark) set.seed(0) dummy_data <- dplyr::data_frame(...

Мне сложно манипулировать выводом tibble, который я получаю после передачи (с использованием dplyr pipe%>%) фрейма данных через серию шагов. Этот код ниже возвращает вывод 2 x 3 тиббла: sr_df %>% group_by(ResolutionViolated) %>% tally()...

Мы можем назначить имена строк фрейма данных, используя оператор <- с rownames(df) , как показано ниже: df<-data.frame(a=letters[1:5], b=1:5, c=LETTERS[1:5]) df rownames(df) <- df[,1] df[,1] <- NULL df Приведенный выше скрипт...

У меня есть фрагмент кода, в котором я обновляю класс объекта. Но я должен нарушить выполнение кода, чтобы назначить класс. Есть ли элегантный способ назначить класс, но продолжить канал, чтобы у меня был один канал до конечного результата? Я...

Я использовал group_by , do и ggplot - дважды - для создания двух простых dfs даты (группы) и списка выходных данных ggplot , большое спасибо за помощь в примерах на этом сайте. Упрощенный пример: p1 <- df_i %>% group_by(Date)...

Мне интересно, можно ли упростить следующий код, чтобы данные передавались непосредственно из команды summate в pairwise.t.test без создания промежуточного объекта? data_for_PTT <- data %>% group_by(subj, TT) %>% summarise(meanRT =...

У меня есть такие данные: data_in <- read_table2("Id Q62_1 Q62_2 Q3_1 Q3_2 Q3_3 Q3_4 Q3_5 1 Yes Sometimes 2 Always 3 4 No Always Yes...

Я столкнулся с проблемой при использовании magrittr %>% , когда возникает неожиданный вывод, когда lhs заключен в !() . Например, я ожидал, что вывод этих двух строк будет идентичным. sum( !( c(1,2,3,4) == 1 ) ) !( c(1,2,3,4) == 1 )...