R ha la funzione startswith o endswith come python?

Question

Cerca i predittori il cui nome inizia con una sottostringa, non è stato possibile trovare alcuna funzione simile.

Answer 1

io non so esattamente quando è stato aggiunto al base (almeno dal 3.3.0), ma startsWith (e endsWith) sono esattamente questo.

> startsWith("what", "wha") 
[1] TRUE 
> startsWith("what", "ha") 
[1] FALSE 

https://stat.ethz.ch/R-manual/R-devel/library/base/html/startsWith.html

Answer 2

Non integrato in questo modo.

Le opzioni includono grepl e substr.

x <- 'ABCDE' 
grepl('^AB', x) # starts with AB? 
grepl('DE$', x) # ends with DE? 
substr(x, 1, 2) == 'AB' 
substr('ABCDE', nchar(x)-1, nchar(x)) == 'DE' 

Answer 3

Questo è relativamente semplice utilizzando la funzione substring:

> strings = c("abc", "bcd", "def", "ghi", "xyzzd", "a") 
> str_to_find = "de" 
> substring(strings, 1, nchar(str_to_find)) == str_to_find 
[1] FALSE FALSE TRUE FALSE FALSE FALSE 

si taglia ogni stringa alla lunghezza desiderata con stringa. La lunghezza è il numero di caratteri che stai cercando all'inizio di ogni stringa.

Answer 4

Prendendo in prestito un certo codice dal pacchetto dplyr[see this] si potrebbe fare qualcosa di simile:

starts_with <- function(vars, match, ignore.case = TRUE) { 
    if (ignore.case) match <- tolower(match) 
    n <- nchar(match) 

    if (ignore.case) vars <- tolower(vars) 
    substr(vars, 1, n) == match 
} 

ends_with <- function(vars, match, ignore.case = TRUE) { 
    if (ignore.case) match <- tolower(match) 
    n <- nchar(match) 

    if (ignore.case) vars <- tolower(vars) 
    length <- nchar(vars) 

    substr(vars, pmax(1, length - n + 1), length) == match 
} 

Answer 5

select La dichiarazione del pacchetto dplyr supporta starts_with e ends_with. Ad esempio, questo seleziona le colonne della cornice dati iride che si aprono con Petal

library(dplyr) 
select(iris, starts_with("Petal")) 

select supporta anche altri comandi. Prova ?select.

Answer 6

Il modo più semplice che posso pensare è quello di utilizzare il %like% dell'operatore:

library(data.table) 

"foo" %like% "^f" 

valuta come TRUE - A partire da f

"foo" %like% "o$" 

valuta come TRUE - Termina con o

"bar" %like% "a" 

valuta come TRUE - contenenti un