R Подмножество data.frame из максимального значения одного вектора и сгруппированного по другому [duplicate]

На этот вопрос уже есть ответ здесь:

Как выбрать строку с максимальным значением в каждой группе 8 ответов
>ID<-c('A', 'A', 'A', 'B', 'B', 'B', 'C', 'C', 'C', 'C', 'C')
>WK<-c(1, 2, 3, 1, 2, 3, 1, 2, 3, 4, 5)
>NumSuccess<-c(0, 0, 2, 0, 0, 1, 0, 0, 0, 0, 3)
>Data<-data.frame(ID, WK, NumSuccess)

Я пытаюсь создать подмножество data.frame «Data2» на основе значения в «NumSuccesses», которое соответствует максимальному значению в «WK», сгруппированному по «ID». Результирующий data.frame должен выглядеть так:

>ID<-c('A','B','C')
>WK<-c(3, 3, 5)
>NumSuccess<-c(2, 1, 3)
>Data2<-data.frame(ID, WK, NumSuccess)

Ответы на вопрос(1)

Ваш ответ на вопрос