R - столбец подмножества, основанный на условии на повторяющихся строках
У меня есть датафрейм с идентичным столбцом, который повторяется, с количеством сайтов. Я хочу знать, как я могу удалить дубликаты ID записей только тогда, когда запись Site_Count больше 0.
Создать DF:
DF <- data.frame(
'ID' = sample(100:300, 100, replace=T),
'Site_count' = sample(0:1, 100, replace=T)
)
Моя попытка подмножества:
subset(DF[!duplicated(DF$ID),], site_count > 0)
Но в этом случае он удалит все 0 сайтов - я хочу установить подмножество, чтобы удалить запись только при наличии дублирующейся записи с более чем 0 сайтами.
Желаемые результаты будут выглядеть примерно так (обратите внимание на идентификаторы сайтов с 0 сайтами, но без дубликатов с 0 и других сайтов):
ID site count
-- ----------
1 0
2 1
3 1
4 0
5 5