小白教程
所有教程
关于
Search
172.69.59.25
172.69.59.25
参数设置
贡献
退出
操作
编辑
移动
保护
信息
历史
删除
查看“R 字符串”的源代码
本页内容
上一节:
R_函数
下一节:
R_列表
因为以下原因,您没有权限编辑本页:
您请求的操作仅限属于该用户组的用户执行:
用户
您可以查看和复制此页面的源代码。
{{DISPLAYTITLE:R 字符串}}[[Category:R 教程|10]] = R 字符串 = R 语言字符串可以使用一对单引号 ' ' 或一对双引号 " " 来表示。 * 单引号字符串中可以包含双引号。 * 单引号字符串中不可以包含单引号。 * 双引号字符串中可以包含单引号。 * 双引号字符串中不可以包含双引号。 以下实例演示来字符串的使用: <sample title="" desc="" lang="r" hererun="1"> a <- '使用单引号' print(a) b <- "使用双引号" print(b) c <- "双引号字符串中可以包含单引号(') " print(c) d <- '单引号字符串中可以包含双引号(") ' print(d) </sample> 执行以上代码输出结果为: <sample title="" desc="" lang="r" hererun="1"> [1] "使用单引号" [1] "使用双引号" [1] "双引号字符串中可以包含单引号(') " [1] "单引号字符串中可以包含双引号(\") " </sample> == 字符串操作 == 以下我们来看下 R 语言一些内置函数对字符串对操作。 === paste() 函数 === paste() 函数用于使用指定对分隔符来对字符串进行连接,默认对分隔符为空格。 语法格式: <sample title="" desc="" lang="r" hererun="1"> paste(..., sep = " ", collapse = NULL) </sample> 参数说明: * ... : 字符串列表 * sep : 分隔符,默认为空格 * collapse : 两个或者更多字符串对象根据元素对应关系拼接到一起,在字符串进行连接后,再使用 collapse 指定对连接符进行连接 <sample title="" desc="" lang="r" hererun="1"> a <- "Google" b <- 'xiaoBai' 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 = ".") </sample> 执行以上代码输出结果为: <sample title="" desc="" lang="r" hererun="1"> [1] "Google xiaoBai Taobao" [1] "Google-xiaoBai-Taobao" [1] "a1=b2=c3=d4=e5=f6" [1] "a 1.b 2.c 3.d 4.e 5.f 6" </sample> === format() 函数 === format() 函数用于格式化字符串,format() 可作用于字符串或数字。 语法格式: <sample title="" desc="" lang="r" hererun="1"> format(x, digits, nsmall, scientific, width, justify = c("left", "right", "centre", "none")) </sample> 参数说明: * x : 输入对向量 * digits : 显示的位数 * nsmall : 小数点右边显示的最少位数 * scientific : 设置科学计数法 * width : 通过开头填充空白来显示最小的宽度 * justify:设置位置,显示可以是左边、右边、中间等。 <sample title="" desc="" lang="r" hererun="1"> # 显示 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("xiaoBai", width = 9, justify = "l") print(result) # 居中显示 result <- format("xiaoBai", width = 10, justify = "c") print(result) </sample> 执行以上代码输出结果为: <sample title="" desc="" lang="r" hererun="1"> [1] "23.1234568" [1] "6.000000e+00" "1.314521e+01" [1] "23.47000" [1] "6" [1] " 13.7" [1] "xiaoBai " [1] " xiaoBai " </sample> === nchar() 函数 === nchar() 函数用于计数字符串或数字列表的长度。 语法格式: <sample title="" desc="" lang="r" hererun="1"> nchar(x) </sample> 参数说明: * x : 向量或字符串 <sample title="" desc="" lang="r" hererun="1"> result <- nchar("Google xiaoBai Taobao") print(result) </sample> 执行以上代码输出结果为: <sample title="" desc="" lang="r" hererun="1"> [1] 20 </sample> === toupper() & tolower() 函数 === toupper() & tolower() 函数用于将字符串的字母转化为大写或者小写。 语法格式: <sample title="" desc="" lang="r" hererun="1"> toupper(x) tolower(x) </sample> 参数说明: * x : 向量或字符串 # 转大写 <sample title="" desc="" lang="r" hererun="1"> result <- toupper("xiaoBai") print(result) # 转小写 result <- tolower("xiaoBai") print(result) </sample> 执行以上代码输出结果为: <sample title="" desc="" lang="r" hererun="1"> [1] "XiaoBai.Wang" [1] "xiaobai" </sample> === substring() 函数 === substring() 函数用于截取字符串。 语法格式: <sample title="" desc="" lang="r" hererun="1"> substring(x,first,last) </sample> 参数说明: * x : 向量或字符串 * first : 开始截取的位置 * last: 结束截取的位置 <sample title="" desc="" lang="r" hererun="1"> # 从第 2 位截取到第 5 位 result <- substring("xiaoBai", 2, 5) print(result) </sample> 执行以上代码输出结果为: <sample title="" desc="" lang="r" hererun="1"> [1] "unoo" </sample>
返回至“
R 字符串
”。
上一节:
R_函数
下一节:
R_列表