R dplyr: Mehrere Spalten löschen

Ich habe einen Datenrahmen und eine Liste von Spalten in diesem Datenrahmen, die ich löschen möchte. Verwenden wir den irisDatensatz als Beispiel. Ich würde gerne fallen Sepal.Lengthund Sepal.Widthnur die verbleibenden Spalten verwenden. Wie mache ich das mit selectoder select_aus dem dplyrPaket?

Folgendes habe ich bisher versucht:

drop.cols <- c('Sepal.Length', 'Sepal.Width')
iris %>% select(-drop.cols)

Fehler in -drop.cols: Ungültiges Argument für unären Operator

iris %>% select_(.dots = -drop.cols)

Fehler in -drop.cols: Ungültiges Argument für unären Operator

iris %>% select(!drop.cols)

Fehler in! Drop.cols: ungültiger Argumenttyp

iris %>% select_(.dots = !drop.cols)

Fehler in! Drop.cols: ungültiger Argumenttyp

Ich habe das Gefühl, dass mir etwas Offensichtliches fehlt, weil dies eine ziemlich nützliche Operation zu sein scheint, die es bereits geben sollte. Auf Github hat jemand ein ähnliches Problem gepostet , und Hadley sagte, er benutze "negative Indexierung". Das habe ich versucht (glaube ich), aber ohne Erfolg. Irgendwelche Vorschläge?

Überprüfen Sie die Hilfe zu select_vars. Das gibt Ihnen einige zusätzliche Ideen, wie Sie damit arbeiten können.

In deinem Fall:

iris %>% select(-one_of(drop.cols))

probiere auch

## Notice the lack of quotes
iris %>% select (-c(Sepal.Length, Sepal.Width))

Darüber hinaus select(-one_of(drop.cols))gibt es einige andere Optionen zum Löschen von Spalten, bei select()denen nicht alle spezifischen Spaltennamen definiert werden (unter Verwendung der Beispieldaten von dplyr starwars für eine größere Vielfalt an Spaltennamen):

starwars %>% 
  select(-(name:mass)) %>%        # the range of columns from 'name' to 'mass'
  select(-contains('color')) %>%  # any column name that contains 'color'
  select(-starts_with('bi')) %>%  # any column name that starts with 'bi'
  select(-ends_with('er')) %>%    # any column name that ends with 'er'
  select(-matches('^f.+s$')) %>%  # any column name matching the regex pattern
  select_if(~!is.list(.)) %>%     # not by column name but by data type
  head(2)

# A tibble: 2 x 2
homeworld species
  <chr>     <chr>  
1 Tatooine  Human  
2 Tatooine  Droid 

Seien Sie vorsichtig mit der select()Funktion, da sie sowohl im dplyr- als auch im MASS-Paket verwendet wird. Wenn also MASS geladen ist, funktioniert select () möglicherweise nicht richtig. Um herauszufinden, welche Pakete geladen werden, geben Sie sie ein sessionInfo()und suchen Sie sie im Abschnitt "Andere angehängte Pakete:". Wenn es geladen ist detach( "package:MASS", unload = TRUE ), geben Sie ein und Ihre select()Funktion sollte wieder funktionieren.

Wir können es versuchen

iris %>% 
      select_(.dots= setdiff(names(.),drop.cols))

Eine andere Möglichkeit besteht darin, die unerwünschten Spalten zu mutieren. Dadurch werden NULLdie eingebetteten Klammern vermieden:

head(iris,2) %>% mutate_at(drop.cols, ~NULL)
#   Petal.Length Petal.Width Species
# 1          1.4         0.2  setosa
# 2          1.4         0.2  setosa

Wenn Sie ein Sonderzeichen in den Spaltennamen haben, entweder selectoder select_möglicherweise nicht wie erwartet. Diese Eigenschaft dplyrder Verwendung ".". Um auf den Datensatz in der Frage zu verweisen, kann die folgende Zeile verwendet werden, um dieses Problem zu lösen:

drop.cols <- c('Sepal.Length', 'Sepal.Width')
  iris %>% .[,setdiff(names(.),drop.cols)]

Du kannst es versuchen

iris %>% select(-!!drop.cols)