Насколько я понимаю, нам нужно отделить отдельные призывы.Если мы используем distinct(df2, mpg,hp, .keep_all=TRUE)
, мы запрашиваем столбцы, которые не имеют дубликатов в обоих столбцах в пределах одной строки, этого не происходит в данном наборе данных, поэтому все возвращается.
Если мы сначала вернем все строкибез дубликатов в hp
, а затем взять эти данные и вернуть только строки без дубликатов в mpg
, вы получите ожидаемый результат.
library(dplyr)
df= mtcars %>% select(mpg,hp)
df2= slice(df,10:20)
df3<-distinct(df2, hp, .keep_all=TRUE)
df4<-distinct(df3, mpg, .keep_all=TRUE)
> df4
mpg hp
1 19.2 123
2 16.4 180
3 10.4 205
4 14.7 230
5 32.4 66
6 30.4 52
7 33.9 65