คำถามติดแท็ก gsub

ฉันต้องการลบอักขระเฉพาะจากสตริงภายในเวกเตอร์ซึ่งคล้ายกับคุณลักษณะค้นหาและแทนที่ใน Excel นี่คือข้อมูลที่ฉันเริ่มต้นด้วย: group <- data.frame(c("12357e", "12575e", "197e18", "e18947") ฉันเริ่มต้นด้วยคอลัมน์แรกเท่านั้น ฉันต้องการสร้างคอลัมน์ที่สองโดยลบe's: group group.no.e 12357e 12357 12575e 12575 197e18 19718 e18947 18947

262 r  regex  replace  gsub  string-substitution 

gsub("(?<![0-9])0+", "", c("005", "0AB", "000", "0"), perl = TRUE) #> [1] "5" "AB" "" "" gsub("(^|[^0-9])0+", "\\1", c("005", "0AB", "000", "0"), perl = TRUE) #> [1] "5" "AB" "" "" นิพจน์ทั่วไปด้านบนมาจากเธรด SO นี้ซึ่งอธิบายวิธีลบศูนย์นำหน้าทั้งหมดออกจากสตริงใน R เนื่องจากการแสดงออกปกตินี้ทั้ง "000" และ "0" จะถูกเปลี่ยนเป็น "" แต่ฉันต้องการลบศูนย์นำหน้าทั้งหมดออกจากสตริงอักขระยกเว้นกรณีที่อักขระสุดท้ายปรากฏเป็นศูนย์หรืออักขระเพียงตัวเดียวคือศูนย์ "005" would become "5" "0AB" would become "AB" "000" …

9 r  regex  string  gsub  stringr