R bekomme korrekten Index mit der() Bedingung

Question

Ich muss eine Beobachtung finden, die einige Kriterien erfüllt und dann diese Indizes mit einem anderen Datensatz zusammenführen. Ich brauche also nicht den Index der Beobachtungen, der die Bedingung erfüllt, sondern den Index, der sich auf alle Beobachtungen bezieht.

Zum Beispiel möchte ich die max(x1) gegeben x2>20 finden und dann diesen Index in einem anderen Datensatz später verwenden. Ich brauche den richtigen Index, mit anderen Worten:

dat <- data.frame(name= c("A","B","C","D"), 
      x1= c(1,2,3,4), 
      x2= c(10,20,30,40)) 
dat$name[which.max(dat$x1[dat$x2>20])] 
[1] B 

Ich möchte

[1] D 

das heißt ein Index von 4 zu bekommen, nicht 2.

Answer 1

Hier ist eine Art und Weise Tabelle mit Daten

library(data.table) 
dat <- as.data.table(dat) 
which(dat[,name]==dat[x2>20,][which.max(x1),name]) 

Kann etwas Ähnliches mit Datenrahmen machen, aber es wird etwas ausführlicher.

which (dat$name==dat$name[which(dat$x2>20)][which.max(dat$x1[which(dat$x2>20)])]) 

Hinweis, daß dieses Verfahren auf der Annahme abhängt, dass Namen eindeutige Werte für jede Zeile enthalten.

Answer 2

Nur max statt which.max verwenden. Der gesamte Datenrahmen muss jedoch basierend auf x1 sortiert werden, da max 1: 1-Mapping durchführt. (Danke @myk_raniu zur Klärung)

dat <- dat[order(dat$x1),] 
dat$name[max(dat$x1[dat$x2>20])] 
#[1] D 

Answer 3

Der Grund which.max nicht die richtige Antwort nicht geben, dass die gefilterte Liste von x1 ist kürzer als die dat $ Namensliste und es ist nicht mehr ein 1: 1

correspondance

Versuchen Sie stattdessen

dat <- data.frame(name= c("A","B","C","D"), 
        x1= c(1,2,3,4), 
        x2= c(10,20,30,40)) 

dat$name[dat$x1==max(dat$x1[dat$x2>20])]