Erstellen Sie eine neue variable aus einer lookup-Tabelle

Ich habe folgende Spalten in meinem Datensatz:

presult     aresult
  I         single
  I         double
  I         triple
  I         home run
  SS        strikeout

Ich würde gern noch eine Dritte Spalte "Grundlagen", die abhängig ist der Wert das Ergebnis in aresult Spalte.

Zum Beispiel, ich möchte Grundlagen 1 für eine Einzel -, 2 Doppel -, 3 Dreibettzimmer, 4 für ein home-run, und 0 für einen strikeout.

In der Regel würde ich erstellen Sie die neue variable wie diese:

dataset$base<-ifelse(dataset$aresult=="single", 1, 0)

Das problem ist, dass ich nicht weiß, wie man code, der die neue variable in ohne Einstellung alle anderen Variablen auf null.

InformationsquelleAutor Burton Guster | 2011-12-08
  1. 15

    definieren Sie Ihre lookup-Tabelle

    lookup= data.frame( 
        base=c(0,1,2,3,4), 
        aresult=c("strikeout","single","double","triple","home run"))

    dann join von plyr

    dataset = join(dataset,lookup,by='aresult')
    • ein wenig Ausführlicher als die Lösung von Dieter, aber mit diesem haben Sie die Flexibilität, definieren Sie die Zuordnung aresult-> base.
    InformationsquelleAutor LouisChiffre
  2. 16

    Hier ist, wie zu verwenden, eine benannte Vektor, der für die Suche:

    Definition von Testdaten:

    dat <- data.frame(
    presult = c(rep("I", 4), "SS", "ZZ"),
    aresult = c("single", "double", "triple", "home run", "strikeout", "home run"),
    stringsAsFactors=FALSE
)

    Definieren Sie einen benannten numerischen Vektor mit den Punkten:

    score <- c(single=1, double=2, triple=3, `home run`=4,  strikeout=0)

    Vektor-Indizierung zu entsprechen, die erzielt gegen-Ergebnisse:

    dat$base <- score[dat$aresult]
dat
  presult   aresult base
1       I    single    1
2       I    double    2
3       I    triple    3
4       I  home run    4
5      SS strikeout    0
6      ZZ  home run    4

    Zusätzliche Informationen:

    Wenn Sie nicht wollen, zu konstruieren, die mit Namen vector von hand sagen, dass Sie in dem Fall, wo Sie große Mengen an Daten, dann tun Sie es wie folgt:

    scores <- c(1:4, 5)
names(scores) <- c("single", "double", "triple", "home run", "strikeout")

    (Oder Lesen Sie die Werte und Namen von vorhandenen Daten. Der Punkt ist der Aufbau eines numerischen Vektor und dann ordnen Sie die Namen.)

    • netter trick, um eine benannte Vektor. Ich habe etwas gelernt hier.
    • +1 gute Idee, eine benannte Vektor. Wünschte, ich hätte gesehen/dachte dies schon vor Jahren!
    • Gibt es eine Möglichkeit, dies zu tun, ohne dass die Zeilen angeben, die. Ich habe einen Datensatz mit tausenden von Zeilen.
    • Ich habe Hinzugefügt zusätzliche Informationen. Ich hoffe, das hilft.
    InformationsquelleAutor Andrie
  3. 3

    Alternative zu Dieter ' s Antwort:

    dat <- data.frame(
  presult = c(rep("I", 4), "SS", "ZZ"),
  aresult = c("single", "double", "triple", "home run", "strikeout", "home run"),
  stringsAsFactors=FALSE
)

dat$base <- as.integer(factor(dat$aresult,
  levels=c("strikeout","single","double","triple","home run")))-1
    InformationsquelleAutor Joshua Ulrich
  4. 1
     dataset$base <- as.integer(as.factor(dataset$aresult))

    Je nach Ihrer Daten.Faktor() konnte weggelassen werden, da in vielen Fällen strings Faktor, der standardmäßig z.B. mit Lesen.Tabelle

    • Wie kann ich festlegen, welchen Wert jedes Ergebnis nimmt?
    • Netter Ansatz, aber für diese zu arbeiten, "Durchgestrichen" werden muss zunächst in der Liste aus, und klicken Sie dann Sie müssen subtrahieren Sie 1.
    • meine Lösung ermöglicht es Ihnen, das zu tun
    • oder verwenden Sie factor statt as.factor und geben Sie die Ebenen/Etiketten, aber Sie wollen.
    InformationsquelleAutor Dieter Menne
Schreibe einen Kommentar