[R某些字符

Question

我有一個大的數據數千列的設置後刪除列名的部分。列名包括各種不需要的字符如下：

col1_3x_xxx 
col2_3y_xyz 
col3_3z_zyx 

我想刪除開始與所有列名「_3」的所有字符串被留下乾淨的：

col1 
col2 
col3 

什麼最有效的方法來做5000+列？

Answer 1

我們可以使用sub

sub("_3.*", "", df1[,1]) 
#[1] "col1" "col2" "col3" 

Answer 2

我們可以用正則表達式模式"^[^_]+(?=_)"嘗試str_extract：

stringr::str_extract(c("col1_3x_xxx", "col2_3y_xyz", "col3_3z_zyx"), "^[^_]+(?=_)") 
[1] "col1" "col2" "col3" 

其中一個模式：

第一^字符串的開頭匹配; [^_]+匹配一個 或多個非_字符，^_指任何字符，但_。 (?=...) 代表超前，因此我們正在尋找_之前的模式。