用向量选择/子集空白行和非空白行[重复]

我想使用一个包含空白(“”)和非空白字符串的向量来对行进行子集,这样我得到的结果就像 dfgoal .

dplyr::select() ,但我收到一条错误消息( Error: Strings must match column names. Unknown columns: tooth, , head, foot ).

谢谢你的帮助!

# Data
df <- data.frame(avar=c("tooth","","","head","","foot","",""),bvar=c(1:8))

# Vector 
veca <- c("tooth","foot") 
vecb <- c("") 
vecc <- as.vector(rbind(veca,vecb)) 
vecc <- unique(vecc) 

# Attempt 
library(dplyr)
df <- df %>% dplyr::select(vecc)

# Goal 
dfgoal <- data.frame(avar=c("tooth","","","foot","",""),bvar=c(1,2,3,6,7,8))