我被困在洗掉每個樣本的前綴上。我試圖洗掉樣本中的所有數字，但這不是分組的好方法。我只想將示例名稱保留為最后兩個后綴。（例如：AAP-L）詳情如下。先感謝您！
geo$pd$title [1]“AAB-HT002-AAP-L”“AAB-HT003-AAP-L”“AAB-HT006-AAP-L”“AAB-HT002-AAP-NL”
[5]“AAB- HT003-AAP-NL" "AAB-HT006-AAP-NL" "AAB-C007-AU-L" "AAB-HT001-AT-L"
[9] "AAB-N-C021-Normal-NC" "AAB- N-C022-正常-NC" "AAB-C024-正常-NC" "AAB-N-C025-正常-NC" [13] "AAB-HT010-AAP.TL" "AAB-HT011-AAP-L" " AAB-HT012-AAP-L" "AAB-HT010-AAP.T-NL"
[17] "AAB-HT011-AAP-NL" "AAB-HT012-AAP-NL" "AAB-C013-AU-L" " AAB-C033-AU-L"
[21] "AAB-C037-AT-L" "AAB-C043-AU-L" "AAB-HT041-AU-L" "AAB-N-C026-正常-NC" [25] "AAB-N-C027-正常-NC" "AAB-N-C028-正常-NC" "AAB-N-C029-正常-NC" "AAB-C014 -AAP-L"
[29] "AAB-HT017-AAP.TL" "AAB-HT018-AAP-L" "AAB-C014-AAP-NL" "AAB-HT017-AAP.T-NL"
[33] "AAB-HT018-AAP-NL" "AAB-C047-AT-L" "AAB-M044-AU-L" "AAB-N-C030-正常-NC" [37] "AAB-N-C032 -正常-NC""AAB-N-C034-正常-NC""AAB-N-C035-正常-NC""AAB-C020-AAP.TL"
[41]"AAB-C038-AAP-L""AABM046 -AAP-L""AAB-C020-AAP.T-NL""AABM046-AAP-NL"
[45]"AAB-C048-AT-L""AAB-HT050-AT-L""AAB-M-060 -AU-L" "AAB-M-061-AU-L"
[49] "AAB-N-C036-Normal-NC" "AAB-N-C039-Normal-NC" "AAB-N-C042-Normal- NC" "AAB-N-C045-正常-NC" [53] "AAB-C052-AAP-L" "AAB-C076-AAP-L" "AAB-M056-AAP-L" "AAB-M058-AAP-大號"
[57] “AAB-C052-AAP-NL” “AAB-C076-AAP-NL” “AAB-M056-AAP-NL” “AAB-M058-AAP-NL”
[61] "AAB-HT077-AU-L" "AAB-HT082-AU-L" "AAB-M080-AU-L" "AAB-N-C054-正常-NC" [65] "AAB-N-C055 -正常-NC" "AAB-N-C059-正常-NC" "AAB-N-C062-正常-NC" "AAB-C083-AAP-L"
[69] "AAB-HT009-AAP-L" "AAB -HT079-AAP-L" "AAB-SF086-AAP-L" "AAB-C083-AAP-NL"
[73] "AAB-HT079-AAP-NL" "AAB-SF086-AAP-NL" "AAB-C016 -AU-L" "AAB-HT008-AU-L"
[77] "AAB-HT091-AT-L" "AAB-SF087-AU-L" "AAB-N-C063-Normal-NC" "AAB-N -C064-正常-NC" [81] "AAB-N-C065-正常-NC" "AAB-HT103-AAP-L" "AAB-SF078-AAP.TL" "AAB-SF099-AAP-L"
[85] "AAB-HT103-AAP-NL" "AAB-SF078-AAP.T-NL" "AAB-SF099-AAP-NL" "AAB-HT096-AT-L"
[89] "AAB-M094-AU -L" "AAB-SF089-AU-L" "AAB-SF090-AU-L" "AAB-SF100-AU-L"
[93] “AAB-N-C069-正常-NC” “AAB-N-C070-正常-NC” “AAB-N-C071-正常-NC” “AAB-N-C072-正常-NC” [97] "AAB-N-C074-正常-NC" "AAB-N-C075-正常-NC" "AAB-N-C085-正常-NC" "AAB-C092-正常-NC"
[101] "AAB-M112- AAP-L" "AAB-SF104-AAP-L" "AAB-SF114-AAP-L" "AAB-SF115-AAP.TL"
[105] "AAB-M112-AAP-NL" "AAB-SF104-AAP- NL" "AAB-SF114-AAP-NL" "AAB-SF115-AAP.T-NL"
[109] "AAB-C109-AU-L" "AAB-C111-AU-L" "AAB-HT101-AU- L" "AAB-M110-AT-L"
[113] "AAB-SF106-AU-L" "AAB-SF113-AU-L" "AAB-N-C098-Normal-NC" "AAB-N-C105-正常-NC" [117] "AAB-N-C107-正常-NC" "AAB-N-C108-正常-NC" "AAB-HT095-AAP.TL" "AAB-HT095-AAP .T-NL"
[121] "AAB-HT097-AT-L" "AAB-C093-正常-NC"
uj5u.com熱心網友回復：
嘗試這個：
library(stringr)
# test data:
string <- c("AAB-HT002-AAP-L", "AAB-HT017-AAP.T-L", "AAB-HT003-AAP-L", "AAB-HT006-AAP-L", "AAB-HT002-AAP-NL")
str_split_fixed(string, '-', n=3)[, 3]
# output:
[1] "AAP-L" "AAP.T-L" "AAP-L" "AAP-L" "AAP-NL"
uj5u.com熱心網友回復：
這將交付終端 (alpha period)-dash-(alpha period)-end 組件。
titles <-c("AAB-HT002-AAP-L", "AAB-HT003-AA.P-L", "AAB-HT006-AAP-L", "AAB-HT002-AA.P-NL")
sub( "(. )([-])([[:alpha:].] [-][[:alpha:].] $)", "\\3", titles)
[1] "AAP-L" "AA.P-L" "AAP-L" "AA.P-NL"
uj5u.com熱心網友回復：
我們可以使用
library(stringr)
str_remove(string, ".*\\d -")
[1] "AAP-L" "AAP.T-L" "AAP-L" "AAP-L" "AAP-NL"
轉載請註明出處，本文鏈接：https://www.uj5u.com/qukuanlian/498165.html
下一篇：如何在回圈內索引新創建的列名