Size: a a a

R (язык программирования)

2020 December 14

БА

Байкулов Антон... in R (язык программирования)
Артём Клевцов
systemd тебе и перезапустить сможет, ежели что не так пойдёт. И таймеры там есть, если надобность такая имеется.
А можно пример service файла? Не могу запустить. Ошибку выдаёт
источник

IS

Ivan Struzhkov in R (язык программирования)
Иван Поздняков
а у меня короче почему-то вышло, где-то 25, но я забыл горизонтальную и вертикальную линии прорисовать
Я кстати тоже забыл)
Но я честно знаю про geom_vline()
источник

ДВ

Дмитрий Володин... in R (язык программирования)
Ivan Struzhkov
Я кстати тоже забыл)
Но я честно знаю про geom_vline()
А может geom_hline() стал бы открытием))
источник

IS

Ivan Struzhkov in R (язык программирования)
Дмитрий Володин
А может geom_hline() стал бы открытием))
откровением я бы сказал)
источник

БА

Байкулов Антон... in R (язык программирования)
Reбята, а кто нибудь через Linux запускал systemd исполнение скрипта?
источник

АК

Артём Клевцов... in R (язык программирования)
Байкулов Антон
А можно пример service файла? Не могу запустить. Ошибку выдаёт
источник

АК

Артём Клевцов... in R (язык программирования)
Байкулов Антон
А можно пример service файла? Не могу запустить. Ошибку выдаёт
источник

АК

Артём Клевцов... in R (язык программирования)
Байкулов Антон
Reбята, а кто нибудь через Linux запускал systemd исполнение скрипта?
Покажи что получилось, попробуем разобраться.
источник

БА

Байкулов Антон... in R (язык программирования)
Артём Клевцов
Покажи что получилось, попробуем разобраться.
[Unit]
Description=TelegramBotMonitoring
[Service]
Type=simple
ExecStart=/usr/bin/R -e /home/baikulov_ant/SNTO/Alerts/bot.R
Restart=always
RestartSec=15
[Install]
WantedBy=multi-user.target
источник

БА

Байкулов Антон... in R (язык программирования)
Добавление флага -e решило вопрос. Теперь сервис запущен
источник

АК

Артём Клевцов... in R (язык программирования)
Байкулов Антон
[Unit]
Description=TelegramBotMonitoring
[Service]
Type=simple
ExecStart=/usr/bin/R -e /home/baikulov_ant/SNTO/Alerts/bot.R
Restart=always
RestartSec=15
[Install]
WantedBy=multi-user.target
/usr/bin/Rscript лучше. И -e надо убрать.
источник

БА

Байкулов Антон... in R (язык программирования)
Артём Клевцов
/usr/bin/Rscript лучше. И -e надо убрать.
А нет, присутствует.
источник

AP

Aleksandr Pidtykan in R (язык программирования)
Кто знает как прописать условия в группировке по data.table?
Рабочая конструкция при gro = "Camp" выглядит   by = c(Camp, status_corder == "Кредит выдан")
Нужен вид типа :
by = c(gro, "status_corder" == "Кредит выдан")
источник

АК

Артём Клевцов... in R (язык программирования)
Aleksandr Pidtykan
Кто знает как прописать условия в группировке по data.table?
Рабочая конструкция при gro = "Camp" выглядит   by = c(Camp, status_corder == "Кредит выдан")
Нужен вид типа :
by = c(gro, "status_corder" == "Кредит выдан")
list(V1, V2 = V3 == "Text")
источник

AP

Aleksandr Pidtykan in R (язык программирования)
Артём Клевцов
list(V1, V2 = V3 == "Text")
Не, не идет выдает: The items in the 'by' or 'keyby' list are length(s) (1,3905). Each must be length 3905; the same length as there are rows in x (after subsetting if i is provided).
источник

АК

Артём Клевцов... in R (язык программирования)
Aleksandr Pidtykan
Не, не идет выдает: The items in the 'by' or 'keyby' list are length(s) (1,3905). Each must be length 3905; the same length as there are rows in x (after subsetting if i is provided).
> library(data.table)
> x <- as.data.table(iris)
> x[, .(m = mean(Petal.Width)), by = .(Species, Setosa = Species == "setosa")]
     Species Setosa     m
1:     setosa   TRUE 0.246
2: versicolor  FALSE 1.326
3:  virginica  FALSE 2.026
источник

AP

Aleksandr Pidtykan in R (язык программирования)
Артём Клевцов
> library(data.table)
> x <- as.data.table(iris)
> x[, .(m = mean(Petal.Width)), by = .(Species, Setosa = Species == "setosa")]
     Species Setosa     m
1:     setosa   TRUE 0.246
2: versicolor  FALSE 1.326
3:  virginica  FALSE 2.026
Чуток другое я пытаюсь сделать :
library(data.table)
 x <- as.data.table(iris)
 gr <- "Species"
 x[, .(m = mean(Petal.Width)), by = .(gr, Setosa = Species == "setosa")]
источник

АК

Артём Клевцов... in R (язык программирования)
Aleksandr Pidtykan
Чуток другое я пытаюсь сделать :
library(data.table)
 x <- as.data.table(iris)
 gr <- "Species"
 x[, .(m = mean(Petal.Width)), by = .(gr, Setosa = Species == "setosa")]
get(gr) тогда.
источник

AP

Aleksandr Pidtykan in R (язык программирования)
Артём Клевцов
get(gr) тогда.
Спасибо, туплю изрядно. Мучал eval и не взуб ногой что не то
источник

O

Olga in R (язык программирования)
кстати, может кому-то пригодится, у меня сосед свой туториал по ggplot обновил.
https://cedricscherer.netlify.app/2019/08/05/a-ggplot2-tutorial-for-beautiful-plotting-in-r/
на англ, правда.
источник