Skip to content

Instantly share code, notes, and snippets.

@sirusb
Last active August 29, 2015 14:13
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save sirusb/7a26794987e2e1600821 to your computer and use it in GitHub Desktop.
Save sirusb/7a26794987e2e1600821 to your computer and use it in GitHub Desktop.
DNAs <- c("ACCT-NACG", "ACGTTCGA","TCACCGAGACTTACGAC")
dnaSet <- DNAStringSet(DNAs)
dnaSet
# A DNAStringSet instance of length 3
# width seq
#[1] 9 ACCT-NACG
#[2] 8 ACGTTCGA
#[3] 17 TCACCGAGACTTACGAC
#يمكن القيام بعمليات على مجموعة من السلاسل مع بعض
# مثلا ناخذ الخمس جزيئات القاعدية الأولى
subseq(dnaSet,start=1,end=5)
# A DNAStringSet instance of length 3
# width seq
#[1] 5 ACCT-
#[2] 5 ACGTT
#[3] 5 TCACC
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment