كيفية إزالة الحرف الأخير من سلسلة في r (مثالان)

يمكنك استخدام الطرق التالية لإزالة الحرف الأخير من كل سلسلة في ناقل في R:

الطريقة الأولى: إزالة الحرف الأخير باستخدام Base R

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

الطريقة الثانية: إزالة الحرف الأخير باستخدام حزمة 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 بصفر في dplyr
كيفية تصفية الصفوف التي تحتوي على سلسلة معينة باستخدام dplyr