АК
Евгений вроде именно это и написал
Не это. А от
[.data.frame лучше подальше деражться по возможности.Size: a a a
2020 March 05
ГД
О, классно, я даже не подумал о таком.
Это будет очень хорошо работать, если гарантируется, что в varname только одно имя переменной. А если там вектор, то первый вариант лучше
АК
iris[vars] <- NULL
Тоже будет работать.
АК
> lobstr::ast(x[[var[1]]])
█─`[[`
├─x
└─█─`[`
├─var
└─1
> lobstr::ast(x[var])
█─`[`
├─x
└─var
> lobstr::ast(x[, var])
█─`[`
├─x
├─``
└─var
АК
data.frame внутри является спискок и к нему применимы все операции со списками.
VK
Ребят, привет! Базовая функция sum() не работает погруппно с созданными через group_by() группами? или я что-то делаю не так?
PU
телепаты в отпуске, покажите код
VK
by_peptide <- group_by(by_peptide, Peptide)
by_peptide_norm$Sum.per.Peptide <- sum(by_peptide$Normalized.Area)
VK
хочу чтобы значение в новом столбце для каждого ряда было суммой всех Normalized.Area по группе Peptide
PU
вы summarise забыли
> library(dplyr)
> tmp <- tibble(
+ var1 = rep(c('a', 'b'), 3),
+ var2 = sample(6)
+ )
>
> tmp %>%
+ group_by(var1) %>%
+ summarise(var3 = sum(var2))
# A tibble: 2 x 2
var1 var3
<chr> <int>
1 a 9
2 b 12
VK
вы summarise забыли
> library(dplyr)
> tmp <- tibble(
+ var1 = rep(c('a', 'b'), 3),
+ var2 = sample(6)
+ )
>
> tmp %>%
+ group_by(var1) %>%
+ summarise(var3 = sum(var2))
# A tibble: 2 x 2
var1 var3
<chr> <int>
1 a 9
2 b 12
Спасибо, но не совсем то. Summarise сжимает датасет, мне надо просто заполнить сумму по пептиду для каждого ряда
PU
так вам построчная сумма нужна что ли?
датасет-то как выглядит?
датасет-то как выглядит?
PU
ну или замените summarise на mutate, если не построчно
PU
> tmp %>%
+ group_by(var1) %>%
+ mutate(var3 = sum(var2))
# A tibble: 6 x 3
# Groups: var1 [2]
var1 var2 var3
<chr> <int> <int>
1 a 2 9
2 b 4 12
3 a 1 9
4 b 3 12
5 a 6 9
6 b 5 12
VK
# A tibble: 450 x 5
# Groups: Peptide [7]
Peptide Glycan Sample Normalized.Area sd
<fct> <chr> <chr> <dbl> <dbl>
1 AYVCGIQNSVSANR [N11H7F5S1] MBS 181152 225281.
2 AYVCGIQNSVSANR [N2H3] MBS 178770 17904.
3 AYVCGIQNSVSANR [N2H3F1] MBS 114877 27256.
4 AYVCGIQNSVSANR [N2H4] MBS 600534 815246.
5 AYVCGIQNSVSANR [N2H5] MBS 445360 257330.
6 AYVCGIQNSVSANR [N2H6] MBS 1587700 105500.
7 AYVCGIQNSVSANR [N2H6F2S2] MBS 2923850 431689.
PU
попробуйте с mutate
VK
Спасибо, похоже на то, что нужно
TL
Здравствуйте, мне порекомендовали этот канал, сказали, что я могу тут задать вопрос. У меня есть БД, к которой я из R подключаюсь и рисую в нем же графики. Моя задача - автоматизировать этот процесс + прикрутить графики к красивому Ворд/пдф шаблону, при этом я не хочу экспортировать графики по 1 и вставлять в Ворд с версткой, а автоматизировать это дело. Вопрос, можно ли вордовский шаблон каким-то образом натянуть на R маркдаун? Шаблон комплексный, с картинками, бэкграундом, иконками и т.д. Я просто очень не хочу для решения этой задачи связываться с shiny
a
Здравствуйте, мне порекомендовали этот канал, сказали, что я могу тут задать вопрос. У меня есть БД, к которой я из R подключаюсь и рисую в нем же графики. Моя задача - автоматизировать этот процесс + прикрутить графики к красивому Ворд/пдф шаблону, при этом я не хочу экспортировать графики по 1 и вставлять в Ворд с версткой, а автоматизировать это дело. Вопрос, можно ли вордовский шаблон каким-то образом натянуть на R маркдаун? Шаблон комплексный, с картинками, бэкграундом, иконками и т.д. Я просто очень не хочу для решения этой задачи связываться с shiny
можно, там есть способ указывать файл образец со специфицированными стилями
TL
Я видела описание этой библиотеки, но не нашла никаких примеров, выходящих за рамки "а давайте напишем дипломную работу в R"