Как удалить строку, имеющую строку, начинающуюся с пробела?

Question

мой набор данных как следующий

John 
Tally 
mac 
hero 

Я хочу, чтобы удалить строку, которая начала с «»

так результирующая переменная будет

John 
Tally 
hero 

Я использовал

library(stringr) 
which(startsWith(names[,1]," ")) 

, чтобы получить строки с ""

Пожалуйста, помогите мне в эффективном способе удалить это?

Answer 1

Один из способов с regex и grepl:

vec <- c('John', 
     'Tally', 
     ' mac', 
     'hero') 

#grepl returns TRUE if there is a match. 
#'^ ' is regex for 'starting with space' 
    > vec[!grepl('^ ', vec)] 
[1] "John" "Tally" "hero" 

Или согласно @NealFultz «s комментарий:

> vec[grep('^ ', vec, invert=TRUE)] 
[1] "John" "Tally" "hero" 

> grep('^ ', vec, invert=TRUE, value=TRUE) 
[1] "John" "Tally" "hero" 

Или, если вы хотите использовать startsWith:

library(gdata) 
#notice the minus sign below just before which 
> vec[-which(startsWith(vec," "))] 
[1] "John" "Tally" "hero" 

или просто (согласно комментарию @Gregor):

> vec[!startsWith(vec, " ")] 
[1] "John" "Tally" "hero" 

Answer 2

Использование stringr:

> vec[!str_detect(vec, "^\\s")] 
# [1] "John" "Tally" "hero" 

Использование stringi:

> vec[!stri_detect(vec, regex = "^\\s")] 
# [1] "John" "Tally" "hero"