print
(
paste
(
a,b,
c
, sep
=
"-"
)
)
print
(
paste
(
letters
[
1
:
6
]
,
1
:
6
, sep
=
""
, collapse
=
"="
)
)
paste
(
letters
[
1
:
6
]
,
1
:
6
, collapse
=
"."
)
执行以上代码输出结果为：
[1] "Google Runoob Taobao"
[1] "Google-Runoob-Taobao"
[1] "a1=b2=c3=d4=e5=f6"
[1] "a 1.b 2.c 3.d 4.e 5.f 6"
format() 函数
format() 函数用于格式化字符串，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
(
"Runoob"
, width
=
9
, justify
=
"l"
)
print
(
result
)
# 居中显示
result
<-
format
(
"Runoob"
, 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] "Runoob "
[1] " Runoob "
nchar() 函数
nchar() 函数用于计数字符串或数字列表的长度。
语法格式：
nchar(x)
参数说明：
x ： 向量或字符串
result
<-
nchar
(
"Google Runoob Taobao"
)
print
(
result
)
执行以上代码输出结果为：
[1] 20
toupper() & tolower() 函数
toupper() & tolower() 函数用于将字符串的字母转化为大写或者小写。
语法格式：
toupper(x)
tolower(x)
参数说明：
x ： 向量或字符串
# 转大写
result
<-
toupper
(
"Runoob"
)
print
(
result
)
# 转小写
result
<-
tolower
(
"Runoob"
)
print
(
result
)
执行以上代码输出结果为：
[1] "RUNOOB"
[1] "runoob"
substring() 函数
substring() 函数用于截取字符串。
语法格式：
substring(x,first,last)
参数说明：
x ： 向量或字符串
first ： 开始截取的位置
last： 结束截取的位置
# 从第 2 位截取到第 5 位
result
<-
substring
(
"Runoob"
,
2
,
5
)
print
(
result
)
执行以上代码输出结果为：
[1] "unoo"
