Size: a a a

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

2020 August 12

ЕТ

Евгений Томилов... in R (язык программирования)
Я отмолю это. Меня заставили.
источник

АК

Артём Клевцов... in R (язык программирования)
Поддерживаю. Есть профильные чаты по данной тематике.
источник

ЕТ

Евгений Томилов... in R (язык программирования)
Артём Клевцов
Поддерживаю. Есть профильные чаты по данной тематике.
Я не нашёл ни одного профильного чата, где есть люди, которые предпочитают писать на R, но иногда вынуждены писать на Питоне. Похоже, только этот чат профильный в данном вопросе. К тому же, я сам и ответил на вопрос.
источник

a

aGricolaMZ in R (язык программирования)
почитайте правила чата, такое запрещено
источник

Н

Ник in R (язык программирования)
aGricolaMZ
почитайте правила чата, такое запрещено
извиняюсь, удаляю
источник

Ю

Юрий 🐙💻🤖📊📈🚬... in R (язык программирования)
Пробуем сами, показываем попытки, но не за деньги
источник

Н

Ник in R (язык программирования)
Юрий 🐙💻🤖📊📈🚬
Пробуем сами, показываем попытки, но не за деньги
согласен, так и для моего обучения лучше будет. хорошо, продолжу поиски решения)
источник

Н

Ник in R (язык программирования)
Тогда так.

Хочу прописать функцию повторного запуска скрипта, если в тексте ошибки есть определенная фраза.

Сам скрипт выглядит так
library(rym)
library(retry)
data <- rym_get_data(counters   = "хххх",
                       date.from  = "2020-01-01",
                       date.to    = Sys.Date(),
                       dimensions = "ххх",
                       metrics    = "xxx",
                       sort       = "-ym:s:date",
                       login      = "xxx",
                       token.path = "xx",
                       lang = "ru") {
                       if warnings(contains ("400: Query is too complicated. Please reduce the date interval or sampling") {
                         stop ("too much data")}
                         }
retry(data, until != "too much data")

но не работает.
подскажите, в чем косякнул?)
источник

PU

Philipp Upravitelev in R (язык программирования)
Ник
Тогда так.

Хочу прописать функцию повторного запуска скрипта, если в тексте ошибки есть определенная фраза.

Сам скрипт выглядит так
library(rym)
library(retry)
data <- rym_get_data(counters   = "хххх",
                       date.from  = "2020-01-01",
                       date.to    = Sys.Date(),
                       dimensions = "ххх",
                       metrics    = "xxx",
                       sort       = "-ym:s:date",
                       login      = "xxx",
                       token.path = "xx",
                       lang = "ru") {
                       if warnings(contains ("400: Query is too complicated. Please reduce the date interval or sampling") {
                         stop ("too much data")}
                         }
retry(data, until != "too much data")

но не работает.
подскажите, в чем косякнул?)
а текст ошибки какой?
источник

PU

Philipp Upravitelev in R (язык программирования)
ну и if криво написан
источник

Н

Ник in R (язык программирования)
Philipp Upravitelev
а текст ошибки какой?
если про ошибку которая появляется при запуске всего скрипта с retry то

Ошибка: неожиданный '{' in:
"                        token.path = "xx",
                       lang = "ru") {"
>                         if warnings(contains ("400: Query is too complicated. Please reduce the date interval or sampling") {
Ошибка: неожиданный симфол in "                        if warnings"
>                           stop ("too much data")}
Ошибка: неожиданный '}' in "                          stop ("too much data")}"
>                           }
Ошибка: неожиданный '}' in "                          }"
> retry(metrika, until != "too much data")
Ошибка: require at least one of the parameters "when" and "until".
Run rlang::last_error() to see where the error occurred.
источник

Н

Ник in R (язык программирования)
Philipp Upravitelev
ну и if криво написан
скорее всего.
писал на основе https://randy3k.github.io/retry/
источник

PU

Philipp Upravitelev in R (язык программирования)
по ссылке корректный пример if дан
источник

PU

Philipp Upravitelev in R (язык программирования)
if (condition) {expression}
источник

PU

Philipp Upravitelev in R (язык программирования)
у вас просто if condition {expression}
источник

АК

Артём Клевцов... in R (язык программирования)
Ник
если про ошибку которая появляется при запуске всего скрипта с retry то

Ошибка: неожиданный '{' in:
"                        token.path = "xx",
                       lang = "ru") {"
>                         if warnings(contains ("400: Query is too complicated. Please reduce the date interval or sampling") {
Ошибка: неожиданный симфол in "                        if warnings"
>                           stop ("too much data")}
Ошибка: неожиданный '}' in "                          stop ("too much data")}"
>                           }
Ошибка: неожиданный '}' in "                          }"
> retry(metrika, until != "too much data")
Ошибка: require at least one of the parameters "when" and "until".
Run rlang::last_error() to see where the error occurred.
Читаем доки:
> f <- function() {message("call f"); stop("!!!")}
> retry(f(), when = "dfasdf")
call f
Ошибка: !!!
> retry(f(), when = "!!!")
call f
call f
call f
call f
call f
call f
^C
источник

A

Alexander in R (язык программирования)
Philipp Upravitelev
if (condition) {expression}
справедливости ради, однострочник можно и if condition expression, для автора вполне рабочий случай, но лучше, конечно, писать именно так
источник

HC

Herman Cherniaiev in R (язык программирования)
Подскажите лучший способ отсортировать вектор например содержащий буквы в произвольном порядке (z, t, o, a, b, c  и далее в алфавитном порядке ) в пайпе %>%
источник

ЕТ

Евгений Томилов... in R (язык программирования)
vec %>% sort()
источник

ЕТ

Евгений Томилов... in R (язык программирования)
Вроде.
источник