摘要:
001、 test <- "jjUUaaBiJJ" ## 测试字符串 newstr <- "" for (i in 1:nchar(test)) { if (substr(test, i, i) %in% letters) { newstr <- paste0(newstr, toupper(sub 阅读全文
posted @ 2022-07-07 12:22
小鲨鱼2018
阅读(602)
评论(0)
推荐(0)
摘要:
001、 test <- "xx aa yy zz" ## 测试字符串 strsplit(test, split = " ") ## split = 用于指定分割的依据, 此处设定为空格 strsplit(test, split = "") ## 指定分割依据为空白 strsplit(test, N 阅读全文
posted @ 2022-07-07 11:22
小鲨鱼2018
阅读(1155)
评论(0)
推荐(0)
摘要:
001、 test <- "jknmq" ## 测试字符串 test temp <- rev(unlist(strsplit(test, NULL))) ## 逆向输出为字符 temp paste(temp, collapse = "") ## 合并为字符串 002、 test <- "jknmq" 阅读全文
posted @ 2022-07-07 10:36
小鲨鱼2018
阅读(207)
评论(0)
推荐(0)
摘要:
001、 test <- c("i", "j", "a", "k", "q") ## 测试字符向量 test paste(test, collapse = "") ## 利用paste合并为一个完整的字符串 阅读全文
posted @ 2022-07-07 10:31
小鲨鱼2018
阅读(828)
评论(0)
推荐(0)
摘要:
001、 test <- "dsrrf" nchar(test) ## 统计字符串test的长度 002、应用于字符串向量 test <- c("ewr", "e", "ew", "werer") nchar(test) 阅读全文
posted @ 2022-07-07 09:41
小鲨鱼2018
阅读(536)
评论(0)
推荐(0)
摘要:
001、rev函数逆向输出向量 test <- c("ewsf", "dsrfe", "iuuyy") test class(test) rev(test) ## 逆向输出 test2 <- 1:5 test2 rev(test2) ## 逆向输出 002、应用数数据框 a <- c(3, 5, 2 阅读全文
posted @ 2022-07-07 09:33
小鲨鱼2018
阅读(1421)
评论(0)
推荐(0)

浙公网安备 33010602011771号