Daten ersetzen - kurz und knapp

Wie rufe ich R-Funktionen auf, wie selektiere ich Daten, ich weiß nicht genau ....

Moderatoren: EDi, jogo

Antworten
Florianho
Beiträge: 4
Registriert: So Aug 02, 2020 8:04 am

Daten ersetzen - kurz und knapp

Beitrag von Florianho »

Ich möchte bestimmte Vermittlernummern (~300) ersetzen mit "VE_O_Z", wenn diese in dem Vector "Ausnahmen" gefunden werden.

Ich verwende immer diverse library, daher habe ich hier keines aufgeführt

Code: Alles auswählen

vermittlernummer <- c("000000", "000011", "000032", "000045")
ausnahmen <- c("000000","000045")

bisher

Code: Alles auswählen

vemittlernummer <- gsub("000000","VE_O_Z",vermittlernummer)
vemittlernummer <- gsub("000045","VE_O_Z",vermittlernummer)
.....

Zielbild

Code: Alles auswählen

Alt            Neu
000000     VE_O_Z
000011     000011
000032     000032
000045     VE_O_Z
Wie kann ich in einer Zeile die Vermittlernummer ändern, wenn diese im Vector "Ausnahmen" vorkommt? Aktuell haben ich über 300 Zeilen wo R jedes Mal die komplette Datenbank durch geht und entsprechend dauert.
Zuletzt geändert von jogo am Fr Okt 16, 2020 2:58 pm, insgesamt 2-mal geändert.
Grund: Formatierung verbessert. http://forum.r-statistik.de/viewtopic.php?f=20&t=29
bigben
Beiträge: 2771
Registriert: Mi Okt 12, 2016 9:09 am

Re: Daten ersetzen - kurz und knapp

Beitrag von bigben »

Florianho hat geschrieben: Fr Okt 16, 2020 2:48 pmIch verwende immer diverse library, daher habe ich hier keines aufgeführt
Was bedeutet das? Dass Du vielleicht Code postest, der bei uns nicht läuft und wir sollen dann selbst suchen, ob das mit irgendeinem Paket Sinn macht?
Wie kann ich in einer Zeile die Vermittlernummer ändern, wenn diese im Vector "Ausnahmen" vorkommt? Aktuell haben ich über 300 Zeilen wo R jedes Mal die komplette Datenbank durch geht und entsprechend dauert.

Code: Alles auswählen

vermittlernummer <- c("000000", "000011", "000032", "000045")
ausnahmen <- c("000000","000045")

ifelse(vermittlernummer %in% ausnahmen,  "Ersatz", vermittlernummer)
LG,
Bernhard

PS: Tipps zum Umcodieren: viewtopic.php?f=20&t=2162
---
Programmiere stets so, dass die Maxime Deines Programmierstils Grundlage allgemeiner Gesetzgebung sein könnte
jogo
Beiträge: 2085
Registriert: Fr Okt 07, 2016 8:25 am

Re: Daten ersetzen - kurz und knapp

Beitrag von jogo »

Die Variante von Bernhard hatte ich auch zuerst, aber vielleicht möchtest Du wirklich auf dem ursprünglichen Vekteor arbeiten. Dann geht auch:

Code: Alles auswählen

vermittlernummer <- c("000000", "000011", "000032", "000045")
ausnahmen <- c("000000","000045")

vermittlernummer[vermittlernummer %in% ausnahmen] <- "VE_O_Z"
Gruß, Jörg
Florianho
Beiträge: 4
Registriert: So Aug 02, 2020 8:04 am

Re: Daten ersetzen - kurz und knapp

Beitrag von Florianho »

Lieber Bernhard und Jörg,

vielen Dank für das Feedback. Genau das habe ich gesucht und in der Tat möchte ich den ursprünglichen Vector gleich verändern ;) . Perfekt. :D
Antworten