代替R中

Question

我的字符串，例如串逆轉，abcdepzxtru

我想要扭轉只有字符串的一部分，我已經開始和字符串的結束指數，比如說1和5 ，即我需要反轉abcde部分abcedpzxtru和輸出應該是edcbapzxtru

我不知道如何做到這一點在R和谷歌搜索並不是很有幫助。

Answer 1

使用stringi ...

library(stringi) 
s <- "abcdepzxtru" 

substr(s,1,5) <- stri_reverse(substr(s,1,5)) 

s 
[1] "edcbapzxtru" 

Answer 2

sapply(strsplit("abcdepzxtru", ""), 
     function(x) paste(x[c(5:1, 6:length(x))], collapse = "")) 
#[1] "edcbapzxtru" 

Answer 3

str <- "abcedpzxtru" 
init <- 1 
end <- 4 
paste(c(sapply(end:init, (function(i) substr(str, i, i))), 
     substr(str,(end+1),nchar(str))), collapse = "", sep = "") 

# [1] "ecbadpzxtru"