Вступ до Bioconductor в R
James Chapman
Curriculum Manager, DataCamp
# Прочитайте послідовність як набір zikaVirus <- readDNAStringSet("data/zika.fa")length(zikaVirus) # набір містить лише одну послідовність width(zikaVirus) # і ширину 10794 основи
1
10794
# Перетворіть на одну послідовність zikaVirus_seq <- unlist(zikaVirus)length(zikaVirus_seq)width(zikaVirus_seq)
10794Error in (function (classes, fdef, mtable) : unable to find an inherited method for function 'width' for signature '"DNAString"'
# створіть новий набір з однієї послідовності
zikaSet <- DNAStringSet(zikaVirus_seq, start = c(1, 101, 201), end = c(100, 200, 300))
zikaSet
DNAStringSet object of length 3:
width seq
[1] 100 AGTTGTTGATCTGTGTGAGTCAGACTGCGACAGTTCGAGTCTGAAG...AACAACAGTATCAACAGGTTTAATTTGGATTTGGAAACGAGAGTTT
[2] 100 CTGGTCATGAAAAACCCCAAAGAAGAAATCCGGAGGATCCGGATTG...CTAAAACGCGGAGTAGCCCGTGTAAACCCCTTGGGAGGTTTGAAGA
[3] 100 GGTTGCCAGCCGGACTTCTGCTGGGTCATGGACCCATCAGAATGGT...TACTAGCCTTTTTGAGATTTACAGCAATCAAGCCATCACTGGGCCT
length(zikaSet)
width(zikaSet)
3
100 100 100

a_seq <- DNAString("ATGATCTCGTAA")
a_seq
12-letter DNAString object
seq: ATGATCTCGTAA
complement(a_seq)
12-letter DNAString object
seq: TACTAGAGCATT
zikaShortSet
DNAStringSet instance of length 2
width seq names
[1] 18 AGTTGTTGATCTGTGTGA seq1
[2] 18 CTGGTCATGAAAAACCCC seq2
rev(zikaShortSet)
A DNAStringSet instance of length 2
width seq names
[1] 18 CTGGTCATGAAAAACCCC seq2
[2] 18 AGTTGTTGATCTGTGTGA seq1
zikaShortSet
A DNAStringSet instance of length 2
width seq names
[1] 18 AGTTGTTGATCTGTGTGA seq1
[2] 18 CTGGTCATGAAAAACCCC seq2
reverse(zikaShortSet)
A DNAStringSet instance of length 2
width seq names
[1] 18 AGTGTGTCTAGTTGTTGA seq1
[2] 18 CCCCAAAAAGTACTGGTC seq2
# Початкова послідовність rna_seq
8-letter RNAString object
seq: AGUUGUUG
reverseComplement(rna_seq)
8-letter RNAString object
seq: CAACAACU
# Використаємо дві функції разом
reverse(complement(rna_seq))
8-letter RNAString object
seq: CAACAACU

Вступ до Bioconductor в R