Buenas tardes, qué tal?

Necesito calcula la moda correspondiente a partir de un vector de edades:

> t<-table(edad)
> t
edad
22 23 24 26 27 28 29 31 33 34 35 36 38 39 42 44 45 47 48 52 59 66 67 69 
 2  1  1  1  1  1  3  1  1  1  3  1  1  1  1  2  3  1  1  1  1  1  1  2 

A la vista del resultado que devuelve table, estamos ante un caso trimodal (la moda es 29, 35 y 45). Yo debería quedarme con la primera: 29. 

¿Cómo menajo t para obtener el índice correspondiente al primer 3? Es decir, para obtener el 29.

Gracias.

Eva

	[[alternative HTML version deleted]]

