Публикации по теме 'tidyverse'
Пакеты агрегатора мета-машинного обучения в R: Round II
написано в декабре 2019 года.
В моем предыдущем посте от середины 2018 года описан мой опыт обучения с пакетами R для мета пакетов агрегатора машинного обучения: mlr, caret и SuperLerner. Эти пакеты объединяют структуру машинного обучения с несколькими независимыми индивидуальными многомерными моделями / пакетами и предоставляют мета структуру машинного обучения вокруг них для общих задач, таких как повторная выборка, настройка, сравнительный анализ, ансамбль и другие.
С тех пор в..
Вопросы по теме 'tidyverse'
Как превратить тиббл с запятой в столбец с разделителями в аккуратный вид
У меня есть следующий тибет:
df <- tibble::tribble(
~Sample_name, ~CRT, ~SR, ~`Bcells,DendriticCells,Macrophage`,
"S1", 0.079, 0.592, "0.077,0.483,0.555",
"S2", 0.082, 0.549,...
312 просмотров
schedule
24.11.2021
Как фильтровать строки для каждого столбца независимо с помощью dplyr
У меня есть следующий тибет:
library(tidyverse)
df <- tibble::tribble(
~gene, ~colB, ~colC,
"a", 1, 2,
"b", 2, 3,
"c", 3, 4,
"d", 1, 1
)
df
#> # A tibble: 4 x 3
#> gene colB colC
#> <chr>...
1727 просмотров
schedule
21.10.2021
Использование dplyr filter () в программировании
Я пишу свою функцию и хочу использовать функцию dplyr filter () для выбора строк моего фрейма данных, удовлетворяющих условию. Это мой код:
library(tidyverse)
df <-data.frame(x = sample(1:100, 50), y = rnorm(50), z = sample(1:100,50), w =...
1717 просмотров
schedule
03.10.2021
пользовательские функции с group_by tidyverse
Мне что-то не хватает в моем понимании того, как group_by работает в tidyverse. Пример прояснит:
Я создал следующую функцию, она принимает несколько аргументов и вычисляет оптимальные веса внутри тиббла (возможно, не самый красивый, но, похоже,...
744 просмотров
schedule
26.09.2021
итеративно применять функцию ggplot внутри функции карты
Я хотел бы создать серию гистограмм для всех переменных в наборе данных, но я явно не готовлю данные правильно для использования в функции карты.
library(tidyverse)
mtcars %>%
select(wt, disp, hp) %>%
map(., function(x)...
1414 просмотров
schedule
02.10.2021
r tidyverse spread () с использованием нескольких пар ключ-значение, не сворачивающих строк
Я пытаюсь spread () пару пар ключ / значение, но столбец общего значения не разрушается. Я думаю, что это может быть связано с какой-то предыдущей обработкой или, что более вероятно, я не знаю, как правильно распределить две или более пары ключ /...
2343 просмотров
schedule
22.11.2021
Использование purrr (tidyverse) для отображения функции расстояния по всем столбцам фрейма данных
У меня есть функция расстояния, которая принимает 2 (числовых) вектора и вычисляет расстояние между ними.
Для заданного фрейма данных ( mtcars_raw ) в приведенном ниже примере и фиксированного входного вектора ( test_vec ) я хотел бы вычислить...
533 просмотров
schedule
12.10.2021
tidytext как сделать облака слов общности и сравнения
Позвольте мне начать со следующего и полностью рабочего кода из Введение в tidytext @ CRAN
library(janeaustenr)
library(dplyr)
library(stringr)
original_books <- austen_books() %>%
group_by(book) %>%
mutate(linenumber =...
637 просмотров
schedule
16.11.2021
Два фрейма данных в R: как сопоставить несколько столбцов за строкой, чтобы найти другое значение строки
Вместо того, чтобы выполнять такой вложенный цикл for:
for (rowAll in 1:nrow(groupDataUnadjusted)) {
year <- groupDataUnadjusted[rowAll, "year"]
income <- groupDataUnadjusted[rowAll, "income_group"]
joint <-...
1133 просмотров
schedule
14.09.2021
Обнаружение различий между двумя строковыми векторами
У меня есть data_frame , который выглядит так.
df <- data_frame(name = c('john','bill','amy'),
name.2 = c('johhn','ball','ammy'))
df
# A tibble: 3 x 2
name name.2
<chr> <chr>
1 john johhn
2 bill ball
3 amy...
2131 просмотров
schedule
20.10.2021
создание воспроизводимого примера с использованием пакета REPEX в r, где читается локальный файл
Я часто использую reprex::reprex для создания воспроизводимых примеров R кода, чтобы получить помощь от других и избавиться от ошибок в моем коде. Обычно я создаю минимальные примеры, используя наборы данных, такие как iris или mtcars , и это...
634 просмотров
schedule
20.11.2021
линейный граф с определенным масштабом для узлов в ggraph R
Я экспериментирую с выдающейся библиотекой ggraph, чтобы изобразить некоторые действительно сложные для изображения взаимосвязи в научной работе. В частности, я хочу показать взаимодействия SNP-SNP в генетическом локусе. Было бы очень хорошо, если...
370 просмотров
schedule
12.09.2021
создание сводных таблиц с помощью tidyverse
Q1. Есть ли более прямой (но все же tidyverse ) способ создания такой сводной таблицы?
library(tidyverse)
library(knitr)
library(kableExtra)
df <- data.frame(group=c(1, 1, 1, 1, 0, 0, 0, 0),
v1=c(1, 2, 3, 4, 5, 6, 1,...
1413 просмотров
schedule
29.09.2021
Как преобразовать фрейм данных / тиббл в именованный список векторов
У меня есть следующий фрейм данных:
library(tidyverse)
dat <- structure(list(seq_name = c("Peptide_set1.r1", "Peptide_set2.r1"
), peptide = c("KSKLRHGC", "AAYVYVNQF"
)), .Names = c("seq_name", "peptide"), row.names = c(NA, -2L), class =...
1267 просмотров
schedule
10.11.2021
Вставка текста в dplyr mutate
Я хотел бы иметь возможность передать строку переменных для задержки в функции dplyr mutate, но у меня возникли некоторые проблемы. Например, это нормально работает:
text <- "lag(depth)"
diamonds %>% mutate_(text)
Но это не так и...
962 просмотров
schedule
29.10.2021
Подсчет пациентов, если они соответствуют определенным критериям в R, но в разное время с помощью tidyverse и lubridate
переливы
У меня есть проблема с подсчетом пациентов:
выполнение определенных критериев, но в разный момент времени. Для проблемы, которую я пытаюсь решить, разные моменты времени - это даты, но с округлением до последнего дня месяца. Как...
74 просмотров
schedule
10.09.2021
Условное изменение и вектор
У меня есть следующий фрейм данных:
df <- data.frame(
x = rep(letters[1:3], 2)
)
И следующий вектор:
vec <- c(1.5, 3.2)
Этот вектор принадлежит каждому b в df . Как мне изменить vec , если он соответствует b , и вернуть...
195 просмотров
schedule
10.10.2021
Заменить строки в переменной с помощью вектора поиска
У меня есть dataframe df с символьной переменной и fromvec и tovec.
df <- tibble(var = c("A", "B", "C", "a", "E", "D", "b"))
fromvec <- c("A", "B",...
218 просмотров
schedule
18.11.2021
Применить функцию к подмножеству многих столбцов в R
Как применить функцию ко многим столбцам сгруппированных строк? Например;
library(tidyverse)
data <- tribble(
~Date, ~Seq1, ~Component, ~Seq2, ~X1, ~X2, ~X3,
"01/01/18", 1, "Smooth", NA, 3.98, 2.75, 1.82,...
200 просмотров
schedule
08.09.2021
Импорт файла excel с функцией read_excel: столбцы даты не импортируются правильно
Я сделал следующий код для импорта файла Excel в Rstudio:
(nms <- names(read_excel("myexcelfile.xlsx")))
(ct <- ifelse(grepl("^Date", nms), "text", "numeric"))
read_excel("myexcelfile.xlsx", col_types = ct)[-c(6:495),-c(3:71)]...
793 просмотров
schedule
12.10.2021