R Abgleich mit mehr als 2 Bedingungen und Rückgabe der Antwort Wert

Hallo, ich habe zwei Daten festlegen, wo die erste ist ein Satz von index:

ind1<-rep(c("E","W"), times=20)
ind2<-sample(100:150, 40)
y<-c(1:40)
index<-data.frame(cbind(ind1, ind2, y))

Zweiten Daten-set ist ein muss indiziert werden.

x1<-sample(c("E","W","N"), 40, replace=TRUE)
x2<-sample(100:150, 40)
x3<-rep(0, times=40)
data<-data.frame(cbind(x1,x2,x3))

Möchte ich angeben, in x3 wo die x1 und x2 im data werden abgestimmt mit ind1 und ind2 im index bzw. und Rücksendung der entsprechenden y.

index1<-split(index, index$ind1)
data1<-split(data, data$x1)
data1$E$x3<-match(data1$E$x2, index1$E$ind2)
data1$W$x3<-match(data1$W$x2, index1$W$ind2)

Es ist irgendwie aufeinander abgestimmt, wie ich wollte, aber kam nicht zurück y richtig. Das Teil habe ich falsch gemacht?
Danke.

Außerdem gibt es eine schnellere/intelligentere Weg, es zu tun? Da hätte ich ja mehr Bedingungen entsprechen. Ursprünglich wollte ich, wenn else-Anweisung, aber hat nicht funktioniert.

InformationsquelleAutor lamushidi | 2013-08-19

Schreibe einen Kommentar