ЕТ
rework_omni %>%
group_by(number) %>%
filter(length(step) > 1) %>%
filter(.data$step[1] == .data$step[2])
Size: a a a
2020 September 01
ЕТ
Вот так.
ЕТ
Спасибо.
PU
сам спросил, сам ответил ##
ЕТ
сам спросил, сам ответил ##
Я такое практикую по ночам периодически. А потом кто-нибудь начнёт искать такой вопрос в поиске чатика и увидит ответ сразу...
АК
rework_omni %>%
group_by(number) %>%
filter(length(step) > 1) %>%
filter(.data$step[1] == .data$step[2])
Только
неожиданном месте. И вообще:
ungroup не забывай, а то сюрприз может быть в самом неожиданном месте. И вообще:
DT[, if (.N > 1 && .SD[1, step] == .SD[2, step]) .SD, by = .(number)]
DT[, if (.N > 1 && .SD[, step[1] == step[2]]) .SD, by = .(number)]
ЕТ
Только
неожиданном месте. И вообще:
ungroup не забывай, а то сюрприз может быть в самом неожиданном месте. И вообще:
DT[, if (.N > 1 && .SD[1, step] == .SD[2, step]) .SD, by = .(number)]
DT[, if (.N > 1 && .SD[, step[1] == step[2]]) .SD, by = .(number)]
Это да. А дататейбл я уже пару лет собираюсь освоить...
EP
S
Еее рокккк
АК
+ можно внести свой вклад: https://github.com/oscarbaruffa/BigBookofR
E
Каким образом можно узнать, сколько по времени будет выполнятся код?
АК
Каким образом можно узнать, сколько по времени будет выполнятся код?
К гадалке сходить можно.
ЕТ
т.е никак?
Ага.
E
К гадалке сходить можно.
Интересное предложение)
ЕТ
Интересное предложение)
Зато можно сравнить алгоритмы на предмет того, что будет в наихудшем случае работать дольше, а что быстрее.
АК
Или можно попробовать выполнить код на тестовых данных разного объёма и при линейном увеличении продолжительности выполнения сделать прогноз на реальный объём.
E
@artemklevtsov @EugeneTomilov спасибо за ответы!
ЕТ
@artemklevtsov @EugeneTomilov спасибо за ответы!
Пожалуйста. =)