mapeo sobre las filas de una trama de datos

Question

Supongamos que tengo una trama de datos con las columnas c1, ..., cn y una función f que toma en las columnas de esta trama de datos como argumentos. ¿Cómo puedo aplicar f a cada fila del marco de datos para obtener un nuevo marco de datos?

Por ejemplo,

x = data.frame(letter=c('a','b','c'), number=c(1,2,3)) 
# x is 
# letter | number 
#  a | 1 
#  b | 2 
#  c | 3 

f = function(letter, number) { paste(letter, number, sep='') } 

# desired output is 
# a1 
# b2 
# c3 

¿Cómo se hace esto? Supongo que es algo parecido a {s, l, t} aplicar (x, f), pero no puedo resolverlo.

Answer 1

como @greg points out, paste() puede hacer esto. Sospecho que su ejemplo es una simplificación de un problema más general. Después de luchar con esto en el pasado, as illustrated in this previous question, terminé usando el paquete plyr para este tipo de cosas. plyr hace mucho más, pero para estas cosas es fácil:

> require(plyr) 
> adply(x, 1, function(x) f(x$letter, x$number)) 
    X1 V1 
1 1 a1 
2 2 b2 
3 3 c3 

que querrá cambiar el nombre de las columnas de salida, estoy seguro

Así, mientras yo estaba escribiendo esto, @joshua mostró una alternativa método que usa ddply. La diferencia en mi ejemplo es que adply trata el marco de datos de entrada como una matriz. adply no usa la variable "agrupar por" row que creó @joshua. Cómo lo hizo es exactamente cómo lo estaba haciendo hasta que Hadley me indicó el enfoque adply(). En la pregunta antes mencionada.

Answer 2

paste(x$letter, x$number, sep = "") 

Answer 3

creo que estabas pensando en algo como esto, pero tenga en cuenta que la familia de funciones apply no vuelven data.frames. También intentarán forzar su data.frame a una matriz antes de aplicar la función.

apply(x,1,function(x) paste(x,collapse="")) 

Por lo que puede estar más interesado en ddply del paquete plyr.

> x$row <- 1:NROW(x) 
> ddply(x, "row", function(df) paste(df[[1]],df[[2]],sep="")) 
    row V1 
1 1 a1 
2 2 b2 
3 3 c3