R 字符串

يمكن استخدام نص R باستخدام قوسين حادين ' ' أو قوسين مائلين " "

• يمكن أن تحتوي نص بين قوسين حادين على نص بين قوسين مائلين

• لا يمكن أن تحتوي نص بين قوسين حادين على نص بين قوسين حادين

• يمكن أن تحتوي نص بين قوسين مائلين على نص بين قوسين حادين

• لا يمكن أن تحتوي نص بين قوسين مائلين على نص بين قوسين مائلين

في هذا المثال، سنعرض استخدام النصوص بين قوسين وحادين وملفوفين.

a <- 'استخدام قوسين حادين'
print(a)
b <- "استخدام قوسين مائلين"
print(b)
c <- "يمكن أن تحتوي نص بين قوسين مائلين على نص بين قوسين وحادين (')'
print(c)
d <- 'يمكن أن تحتوي نص بين قوسين وحادين على نص بين قوسين مائلين (")'
print(d)

执行以上代码输出结果为：

[1] "استخدام قوسين حادين"
[1] "استخدام قوسين مائلين"
[1] "يمكن أن تحتوي نص بين قوسين مائلين على نص بين قوسين وحادين ('}"
[1] "يمكن أن تحتوي نص بين قوسين وحادين على نص بين قوسين مائلين (\"}"

عمليات النصوص

سنلقي نظرة على بعض الدوال المدمجة في لغة R الخاصة بالعمليات على النصوص.

دالة paste()

يستخدم دالة paste() لدمج النصوص باستخدام علامة الفصل المحددة، وعلامة الفصل الافتراضية هي الفراغ

语法格式：

paste(..., sep = "", collapse = NULL)

参数说明：

• ...: قائمة النصوص

• sep: علامة الفصل، بناءً على القيمة الافتراضية التي تكون فراغًا

• collapse: يدمج اثنان أو أكثر من كائنات النص بناءً على العلاقة بين العناصر، ثم يتم ربط الروابط باستخدام collapse بعد دمج النصوص

a <- "Google"
b <- 'w3codebox'
c <- "Taobao"
print(paste(a, b, c))
print(paste(a, b, c, sep = "-"))
print(paste(letters[1:6], 1:6, sep = "", collapse = "="))
paste(letters[1:6], 1:6, collapse = ".")

执行以上代码输出结果为：

[1] "Google w3codebox Taobao"
[1] "Google-w3codebox-Taobao"
[1] "a1=b2=c3=d4=e5=f6"
[1] "a 1.b 2.c 3.d 4.e 5.f 6"

function format()

استخدام function format() لتنسيق النصوص، يمكن استخدام function format() على النصوص أو الأرقام.

语法格式：

format(x, digits, nsmall, scientific, width, justify = c("left", "right", "centre", "none"))

参数说明：

• x: إدخال مجموعة من الأرقام

• digits: عدد الأرقام التي يتم عرضها

• nsmall: عدد الأرقام بعد نقطة العشر التي يتم عرضها

• scientific: ضبط نظام العدد العلمي

• width: عرض الأقل من خلال تعبئة الفراغات في البداية

• justify: ضبط الموقع، يمكن أن تكون العرض على اليسار أو اليمين أو في الوسط وما إلى ذلك.

# عرض 9 رقم، ويتم تقريب آخر رقم
result <- format(23.123456789, digits = 9)
print(result)
# عرض باستخدام نظام العدد العلمي
result <- format(c(6, 13.14521), scientific = TRUE)
print(result)
# عرض أقل من 5 أرقام بعد نقطة العشر، ويتم تعويضها بـ 0 إذا لم يكن هناك
result <- format(23.47, nsmall = 5)
print(result)
# تحويل الرقم إلى نص
result <- format(6)
print(result)
# عرض 6 حرف، ويتم إضافة مسافات فارغة في البداية إذا لم يكن هناك مسافات كافية
result <- format(13.7, width = 6)
print(result)
# حرف يسار
result <- format("w3codebox", width = 9, justify = "l")
print(result)
# 居中显示
result <- format("w3codebox", width = 10, justify = "c")
print(result)

执行以上代码输出结果为：

[1] "23.1234568"
[1] "6.000000e+00" "1.314521e+01"
[1] "23.47000"
[1] "6"
[1] "    13.7"
[1] "w3codebox    "
[1] "    w3codebox    "

nchar() 函数

nchar() 函数用于计数字符串或数字列表的长度。

语法格式：

nchar(x)

参数说明：

• x ： 向量或字符串

result <- nchar("Google w3codebox Taobao")
print(result)

执行以上代码输出结果为：

[1] 20

toupper() & tolower() 函数

toupper() & tolower() 函数用于将字符串的字母转化为大写或者小写。

语法格式：

toupper(x)
tolower(x)

参数说明：

• x ： 向量或字符串

# 转大写

result <- toupper("w3codebox")
print(result)
# 转小写
result <- tolower("w3codebox")
print(result)

执行以上代码输出结果为：

[1] "w3codebox"
[1] "w3codebox"

substring() 函数

substring() 函数用于截取字符串。

语法格式：

substring(x,first,last)

参数说明：

• x ： 向量或字符串

• first ： 开始截取的位置

• last： 结束截取的位置

# 从第 2 位截取到第 5 位
result <- substring("w3codebox", 2, 5)
print(result)

执行以上代码输出结果为：

[1] "hooo"