如何在R中以3个为一组粘贴字符

dna=c("TACACGATGACAGTCTTGACGGGTTCTCCTACT")
dna.sg = unlist(strsplit(dna, ""))

 [1] "T" "A" "C" "A" "C" "G" "A" "T" "G" "A" "C" "A" "G" "T" "C" "T" "T" "G" "A" "C" "G" "G" "G" "T" "T" "C" "T" "C" "C" "T" "A" "C" "T"

"TAC" "ACG" [...]

unlist(strsplit(dna, "(?<=.{3})", perl = TRUE))
#[1] "TAC" "ACG" "ATG" "ACA" "GTC" "TTG" "ACG" "GGT" "TCT" "CCT" "ACT"

R相关问答推荐

是什么导致R中的mvtnorm包中出现这个错误？

R：随机抽取所有可能排列的样本

如何在R中正确对齐放射状图中的文本

具有多个依赖变量/LHS的逻辑模型

如何使用R Shiny中的条件面板仅隐藏和显示用户输入，同时仍允许运行基础计算？

将复杂的组合列表转换为数据框架

如何删除gggvenn与gggplot绘制的空白？

使用case_match()和char数组重新编码值

根据多个条件增加y轴高度以适应geom_text标签

使用整齐的计算(curl -curl )和杂音

如何删除仅在数据集顶部和底部包含零的行

R Select()可以测试不存在的子集列

您是否可以折叠R中的重复行，同时保留基于所选列的值？

SHINY：使用JS函数应用的CSS样式显示HTML表格

从服务器在Shiny中一起渲染图标和文本

根据纬度和距离连接两个数据集

如何将一个方阵分解成没有循环的立方体

防止在更新SHINY中的Reactive Value的部分内容时触发依赖事件

将多个列合并为一个列的有效方法是什么？

如何判断代码是否在R Markdown(RMD)上下文中交互运行？