Ottenere le corde prima della virgola con R

Question

io sono un principiante con R. Ora, ho un vettore in un data.frame come questo

city 
Kirkland, 
Bethesda, 
Wellington, 
La Jolla, 
Berkeley, 
Costa, Evie KW172NJ 
Miami, 
Plano, 
Sacramento, 
Middletown, 
Webster, 
Houston, 
Denver, 
Kirkland, 
Pinecrest, 
Tarzana, 
Boulder, 
Westfield, 
Fair Haven, 
Royal Palm Beach, Fl 
Westport, 
Encino, 
Oak Ridge, 

voglio pulirlo. Quello che voglio sono tutti i nomi delle città prima della virgola. Come posso ottenere il risultato in R? Grazie!

Answer 1

È possibile utilizzare gsub con un po 'di regexp:

cities <- gsub("^(.*?),.*", "\\1", df$city) 

questo funziona, troppo:

cities <- gsub(",.*$", "", df$city) 

Answer 2

si potrebbe usare regexpr per trovare la posizione del primo comma in ogni elemento e utilizzare substr per sniparli in questo:

x <- c("London, UK", "Paris, France", "New York, USA") 

substr(x,1,regexpr(",",x)-1) 
[1] "London" "Paris" "New York" 

Answer 3

Solo per divertimento, è possibile utilizzare strsplit

> x <- c("London, UK", "Paris, France", "New York, USA") 
> sapply(strsplit(x, ","), "[", 1) 
[1] "London" "Paris" "New York" 

Answer 4

Questo metodo funziona così:.

x <- c("London, UK", "Paris, France", "New York, USA") 

library(qdap) 
beg2char(x, ",") 

## > beg2char(x, ",") 
## [1] "London" "Paris" "New York"