У меня есть код, который определяет, когда право собственности перешло к новому владельцу. В столбце transition код назначает значение «1» каждый раз, когда происходит переход, и «0», если свойство не было изменено. «1» присваивается новому владельцу перехода. Это помогает мне собирать данные всех новых покупателей.
Мне нужен сейчас код, который идентифицирует продавца объекта (то есть строка над новым владельцем со значением 1). Я полагаю, что это возможно с функцией задержки dplyr, но у меня возникают проблемы с ее реализацией.
Например, если есть переход между A (продавец) и B (покупатель), я могу в настоящее время только идентифицировать покупателя B (переход = 1), но тоже хочу определить продавца.
Вот код для покупателей:
transitions <- transitions %>%
group_by(property) %>%
mutate(transition = ifelse(name != dplyr::lag(name), 1, 0))