วิธีลบอักขระตัวสุดท้ายออกจากสตริงใน r (2 ตัวอย่าง)

คุณสามารถใช้วิธีการต่อไปนี้เพื่อลบอักขระตัวสุดท้ายออกจากแต่ละสตริงในเวกเตอร์ใน R:

วิธีที่ 1: ลบอักขระตัวสุดท้ายโดยใช้ Base R

 substr(df$some_column, 1 , nchar(df$some_column)- 1 )

วิธีที่ 2: ลบอักขระตัวสุดท้ายโดยใช้แพ็คเกจ stringr

 library (stringr) 

str_sub(df$some_column, end = -2 )

ตัวอย่างต่อไปนี้แสดงวิธีการใช้แต่ละวิธีกับกรอบข้อมูลต่อไปนี้ใน R:

 #create data frame
df <- data. frame (name=c('Andy', 'Bert', 'Chad', 'Derrick', 'Eric', 'Fred'),
                 sales=c(18, 22, 19, 14, 14, 11))

#view data frame
df

     name sales
1 Andy 18
2 Bert 22
3 Chad 19
4 Derrick 14
5 Eric 14
6 Fred 11

ตัวอย่างที่ 1: ลบอักขระตัวสุดท้ายโดยใช้ Base R

รหัสต่อไปนี้แสดงวิธีการลบอักขระตัวสุดท้ายออกจากแต่ละสตริงในคอลัมน์ ชื่อ เฟรมข้อมูล:

 #remove last character from each string in 'name' column
df$name = substr(df$name, 1 , nchar(df$name)- 1 )

#view updated data frame
df

    name sales
1 And 18
2 Ber 22
3 Cha 19
4 Derrick 14
5 Eri 14
6 Fre 11

โปรดทราบว่าอักขระตัวสุดท้ายของแต่ละสตริงในคอลัมน์ ชื่อได้ ถูกลบออกแล้ว

ตัวอย่างที่ 2: ลบอักขระตัวสุดท้ายโดยใช้แพ็คเกจ stringr

รหัสต่อไปนี้แสดงวิธีการลบอักขระตัวสุดท้ายของแต่ละสตริงในคอลัมน์ ชื่อ เฟรมข้อมูลโดยใช้ฟังก์ชัน str_sub() จากแพ็คเกจ stringr :

 library (stringr)

#remove last character from each string in 'name' column
df$name <- str_sub(df$name, end = -2 )

#view updated data frame
df

    name sales
1 And 18
2 Ber 22
3 Cha 19
4 Derrick 14
5 Eri 14
6 Fre 11

โปรดทราบว่าอักขระตัวสุดท้ายของแต่ละสตริงในคอลัมน์ ชื่อได้ ถูกลบออกแล้ว

โปรดทราบว่าวิธีนี้ให้ผลลัพธ์ที่เหมือนกันกับวิธีก่อนหน้า

อย่างไรก็ตาม หากคุณกำลังทำงานกับบล็อกข้อมูลที่มีขนาดใหญ่มาก str_sub() อาจจะเร็วกว่าฟังก์ชัน R substr() พื้นฐาน

แหล่งข้อมูลเพิ่มเติม

บทช่วยสอนต่อไปนี้จะอธิบายวิธีดำเนินการงานทั่วไปอื่นๆ ใน R:

วิธีบันทึกค่าใหม่โดยใช้ dplyr
วิธีแทนที่ NA ด้วย Zero ใน dplyr
วิธีกรองแถวที่มีสตริงบางตัวโดยใช้ dplyr