У меня есть такой пример:

dat=c(2,1,1,2,3,4,2,5,6,7,8,1,2,4,5,6,7,3,4,5,2,3,1,2,1)

Я хочу присвоить значения перед началом [после появления 3 последовательных значений со средним значением> 3] и после конца [определяется как появление 3 последовательных значений <3] в NA.

Ожидаемые результаты

dat=c(NA,NA,NA,NA,NA,4,2,5,6,7,8,1,2,4,5,6,7,3,4,5,2,3,NA,NA,NA)
r
-1
temor 25 Сен 2020 в 19:43

1 ответ

Лучший ответ

Используйте rollmean, чтобы найти средние значения трех периодов, и rollapply с all, чтобы найти последовательные значения, которые все <= 3.

library(zoo)

r1 <- rollmean(dat, 3, fill = NA, align = "left")
i1 <- which(r1 > 3)[1]

r2 <- rollapply(dat <= 3, 3, all, fill = NA, align = "left")
i2 <- tail(which(r2), 1)-1

replace(NA*dat, i1:i2, dat[i1:i2])
## [1] NA NA NA NA NA  4  2  5  6  7  8  1  2  4  5  6  7  3  4  5  2  3 NA NA NA
2
G. Grothendieck 25 Сен 2020 в 17:48

Похожие вопросы

19 Сортировка (упорядочивание) строк фрейма данных по нескольким столбцам
11 Как объединить (объединить) фреймы данных (внутренний, внешний, левый, правый)
15 Как суммировать переменную по группе
18 Преобразование столбцов data.frame из факторов в символы
17 Удалите строки со всеми или некоторыми NA (отсутствующими значениями) в data.frame
26 Как заменить значения NA нулями в кадре данных R?
14 Как изменить заголовок легенды в ggplot
13 Как я могу просмотреть исходный код функции?
4 data.table vs dplyr: может ли один сделать что-то хорошо, а другой не может или плохо?
3 Считайте отрицательные значения, если в столбце не менее шести последовательных отрицательных значений.
1 Заменить n-е последовательное вхождение значения
1 Как исключить непоследовательные даты на основе значений столбцов?
4 Удалите идентификатор, если какие-либо последовательные значения не соответствуют пороговому значению
2 Подсчитывать и назначать последовательные вхождения переменной
3 удалить последовательные значения в таблице данных
💵 Получи $100 на хостинг на 60 дней.
Регистрируйся!

Новые вопросы

1 Указание разных заголовков ggplot при использовании цикла for для создания нескольких графиков
3 Как правильно отсортировать значения оси x (месяц-год) на гистограмме ggplot2?
2 Запуск линейных регрессий за несколько лет из одного фрейма данных в R и сохранение коэффициентов в новый фрейм данных
2 Как использовать функцию R развертки
1 Как рассчитать размер выборки с помощью R, применяя дизайн смешанной модели
3 Shiny / DT / сохранить изменения при переключении и окрашивании ячеек после изменения
1 R data.table скользящее соединение и т. д., чтобы добавить динамику к предыдущему периоду
1 использование mutate, paste0 и case_when в итерации; проблема с изменением существующих переменных с помощью paste0
1 Как сделать увеличенную врезку карты с помощью ggmagnify и ggplot2
1 Как загрузить с URL-адреса данные .xls с объединенными ячейками с помощью R
Все вопросы по теме r >

r

R — это бесплатный язык программирования с открытым исходным кодом и программная среда для статистических вычислений, биоинформатики, визуализации и общих вычислений. Пожалуйста, используйте минимально воспроизводимые примеры, которые другие могут запустить с помощью копирования и вставки. Показать желаемый результат полностью. Используйте dput() для данных и укажите все небазовые пакеты с помощью library(). Не вставляйте изображения для данных или кода, вместо этого используйте блоки кода с отступом. Для вопросов по статистике используйте https://stats.stackexchange.com.

Подробнее про r...