Fonction similaire à SQL clause 'where' dans R

J'ai un ensemble de données affectée à une variable nommée 'temps', qui ont des colonnes 'date', 'température', 'pays'.

Je veux faire quelque chose de ce genre, qui, je peux le faire en SQL

SELECT * FROM temps WHERE country != 'mycountry'

Comment puis-je faire la même sélection en R?

  • library(dplyr) ; temps %>% filter(country != 'mycountry') ... ou voir sqldf, si vous le souhaitez
  • Je ne pense pas que je veux une bibliothèque externe pour faire le travail.
InformationsquelleAutor Lasitha Yapa | 2016-06-12
  1. 10

    Nous pouvons utiliser la même syntaxe que dans base R

    temps[temps$country != "mycountry",]

    Repères

    set.seed(24)
temps1 <- data.frame(country = sample(LETTERS, 1e7, replace=TRUE),
                  val = rnorm(1e7))
system.time(temps1[!temps1$country %in% "A",])
#  user  system elapsed 
#   0.92    0.11    1.04 
system.time(temps1[temps1$country != "A",])
#   user  system elapsed 
#   0.70    0.17    0.88

    Si nous utilisons des solutions

    library(sqldf)
system.time(sqldf("SELECT * FROM temps1 WHERE country != 'A'"))
#   user  system elapsed 
# 12.78    0.37   13.15 

library(data.table)
system.time(setDT(temps1, key = 'country')[!("A")])
#   user  system elapsed 
#  0.62    0.19    0.37
    InformationsquelleAutor akrun
  2. 4

    Cela devrait le faire.

    temps2 <- temps[!temps$country %in% "mycountry",]
    InformationsquelleAutor milan
  3. 2

    Voici sqldf et de la base de R les approches de la source et l'échantillon de sortie basés sur les données indiquées dans la Note ci-dessous.

    1) sqldf

    library(sqldf)
sqldf("SELECT * FROM temps WHERE country != 'mycountry'")
##   country value
## 1   other     2

    2) de la base de R

    subset(temps, country != "mycountry")
##   country value
## 2   other     2

    Remarque: Les données de test utilisés ci-dessus sont présentés ici. La prochaine fois pleaes fournir de tels reproductible des données de l'échantillon dans la question.

    # test data
temps <- data.frame(country = c("mycountry", "other"), value = 1:2)
    InformationsquelleAutor G. Grothendieck