R语言中实现字符串的逆转

 

001、

test <- "erijk"
temp <- unlist(strsplit(test, split = ""))     ## 把字符串拆分为字符
rev(temp)
paste(rev(temp), collapse = "")                ## 逆转并合并

 

 

 

002、

test <- "akujm"         ## 测试字符串
utf8ToInt(test)         ## 字符转换为数值
rev(utf8ToInt(test))    ## 逆转
intToUtf8(rev(utf8ToInt(test)))   ## 数值转换为字符

 

 

 

003、使用stringi

test <- "aekmji"      ## 测试字符串
library(stringi)
stri_reverse(test)    ## 逆转字符串

 

 

 

004、使用IRanges包

test <- "aekmji"    ## 测试字符串
library(IRanges)
reverse(test)       ## 逆转字符串

 

 

 

005、使用

test <- "aekmji"    ## 测试字符串
library(Biostrings)
reverse(test)       ## 逆转字符串

 

 

006、

test <- "aekmji"   ## 测试字符串

str <- ""          ## 循环实现
for (i in nchar(test):1) {
  str <- paste0(str, substr(test, i, i))  
}
str

 

 

参考：https://zhuanlan.zhihu.com/p/368352810