Skip to main content
2 de 6
se añadieron 522 caracteres en el cuerpo
Patricio Moracho
  • 61.1k
  • 12
  • 42
  • 72

Por lo que entiendo que buscas: Obtener el primer registro de cada id podrías simplemente usar slice():

# Agrandamos un poco tu ejemplo con una columna más
data<-data.frame(id=c(1,1,3,4),n=c("x","y","e","w"), o=c(4,3,2,1))
data

  id n o
1  1 x 4
2  1 y 3
3  3 e 2
4  4 w 1

data %>%
    group_by(id) %>%
    slice(1)

# A tibble: 3 x 3
# Groups:   id [3]
     id n         o
  <dbl> <fct> <dbl>
1    1. x        4.
2    3. e        2.
3    4. w        1.

El tema es cual de los registros de cada grupo quieres dejar y cuales ignorar, slice() en una alternativa simple y clara, pero si necesitas controlar el orden por el cual te vas a quedar con el primero top_n() sin duda puede ser mucho mejor.

data %>%
    group_by(id) %>%
    top_n(n = 1, wt=-o) # Ordenamos por la columna 'o' ascendente

Asimismo, puedes consultar el sitio en inglés, esta pregunta tiene muchas otras opciones interesante para resolver este tema.

Patricio Moracho
  • 61.1k
  • 12
  • 42
  • 72