在数据框中拆分序列？

Question

我有一个这样的 csv 文件，

x <- read.csv("C:/Users/XXXX/Documents/XXXX/Day1_15042014/work2.csv")
class(x)
x$Sequence.window![enter image description here][1]

> x$Sequence.window

  [1] VVELRKTGGDTLEFHKFYKNFSSGLKDVVWN                                                                
  [2] PGLTTQGTKFGRKIVKTLAYRVKSTQPSSGN                                                                
  [3] EATEFYLRYYVGHKGKFGHEFLEFEFREDGK                                                                
  [4] LVPVVWGERKTPEIEKKGFGASSKAATSLPS                                                                
  [5] NMNELPEKKNSAGFIKLEDKQKLIVEMEKSV                                                                
  [6] PTLHFNYRYFETDAPKDVPGAPRQWWFGGGT                                                                
  [7] PDPTTAPMEAAKQPKKKRSRSKKCKSVNNLD                                                                
  [8] PAKAAKTAKVTSPAKKAVAATKKVATVATKK                                                     

这个类是一个数据框。我现在想在 10:22 范围内拆分序列窗口（Ex [1] VVELRKTGGDTLEFHKFYKNFSSGLKDVVWN，所有序列的输出应该类似于 [1] DTLEFHKFYKNFS）。我将如何在数据框中执行此操作？

Answer 1

你可以使用substr函数

#dummy data
x <- read.table(text="Sequence.window
VVELRKTGGDTLEFHKFYKNFSSGLKDVVWN
PGLTTQGTKFGRKIVKTLAYRVKSTQPSSGN
EATEFYLRYYVGHKGKFGHEFLEFEFREDGK",header=TRUE,as.is=TRUE)

#substr from 10 to 22
substr(x$Sequence.window,start=10,stop=22)
#[1] "DTLEFHKFYKNFS" "FGRKIVKTLAYRV" "YVGHKGKFGHEFL"