[R-es] aplicar codigo

[Samura .]

Hola,
me gustar�a hacer algo como en el siguiente ejemplo

A un df a�adirle una columna que es la transformaci�n de otra,
en plan a todo lo que sea  x1, x2, x3 lo llamo prueba 1
todo lo que sea x4,x5,x6 lo llamo prueba 2
el resto de x las dejo como est�n.

Ser�a algo as�

col1 <- c('x1', 'x2', 'x11', 'x1','x33', 'x1','x4', 'x5', 'x35', 'x1','x2', 'x4')
df1<-data.frame(col1)
attach(df1)

df1$transformacion<-ifelse(col1 == "x1"|col1 == "x2"| col1 == "x3", "prueba1",
                           ifelse(col1 == "x4"|col1 == "x5"| col1 == "x6", "prueba2", col1))

detach(df1)
df1

pero ahora en vez de un df tengo varios

col2 <- c('x12', 'x4', 'x6', 'x771','x4', 'x2')
col3 <- c('x7', 'x2', 'x4', 'x5','x111', 'x1','x4', 'x5', 'x35','x2','x2', 'x4','x6', 'x5')
df2<-data.frame(col2)
df3<-data.frame(col3)

�c�mo puedo aplicar el c�digo al resto de los df sin tener que repetirlo?



	[[alternative HTML version deleted]]