Odpowiedz Odpowiedz

Łaczenie kolumn

Temat: Łaczenie kolumn

Witam
Napisałem coś takiego - mini funkcję, która łączy mi kilka kolumn o różnej długości wg pewnego klucza. Czy może ktoś wymyślił coś prostszego w zapisie.



x=seq(2,32,2)

y=cbind(c(2,8,16,22),c(10,15,99,2))

z=cbind(c(2,8,18,24,28),c(1,11,9,2,18))



polocz=function(x,y)

  {

x=cbind(x,0)

  for(i in 1:length(x[,1]))

  {for(j in 1: length(y[,1]))

    {

      if(x[i,1]==y[j,1]) x[i,ncol(x)]=y[j,2]

    }

  }

;

return(x)

}

xnowy=polocz(x,y)

xnowy=polocz(xnowy,z)