-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathtemp.R
executable file
·11 lines (10 loc) · 8.93 KB
/
temp.R
1
2
3
4
5
6
7
8
9
10
11
sqs <- "NNNNNNNNNNNNNNNNNNNNGGANGTANNNNCCATGATTATCGCAAATCAAAACAAAACAAACTCAACAAAATACACGATAAAAAAAAAAACAAAAACAAACCAACAAAAAAAAATATATAAAAAAACAACCAAAAAACAAAAAAAAAAATACAATCCACACTCAAAAACCATCCAAAACATTACACATATCTTCAAACATATAATATCTTAAACAACCTCTAAATACAAACCACACCCCTCTCCCCACCCCTTAACTACCCTTCCACACACCCTTCCCTACCAACCCACCCCTACCCTCCCCCTCTTACCGCACACCCCGCTAAATCTACTCTACCTTAACCTACAACAATACCCAATAACCCAATAACCTCCTTCCTACTACTGATAATAATTAATTAAGACGTCAGAATTCTCGAGGCGGCCGCATGTGCGTCTCCCTATAGTGAGTCGTATTAATTTCGCGGGCGGAACCCCTATTTGTTTATTTTTCTAAATACATTCAAATATGTATCCGCTCATGAGACAATAACCCTGATAAATGCTTCAATAATATTGAAAAAGGAAGAGTATGAGTATTCAACATTTCCGTGTCGCCCTTATTCCCTTTTTTGCGGCATTTTGCCTTCCTGTTTTTGCTCACCCAGAAACGCTGGTGAAAGTAAAAGATGCTGAAGATCAGTTGGGTGCACGAGTGGGTTACATCGAACTGGATCTCAACAGCGGTAAGATCCTTGAGAGTTTTCGCCCCGAAGAACGTTTTCCAATGATGAGCACTTTTAAAGTTCTGCTATGTGGCGCGGTATTATCCCGTATTGACGCCGGGCAAGAGCAACTCGGTCGCCGCATACACTATTCTCAGAATGACTTGGTTGAGTACTCACCAGTCACAGAAAAGCATCTTACGGATGGCATGACAGTAAGAGAATTATGCAGTGCTGCCATAACCATGAGTGATAACACTGCGGCCAACTTACTTCTGACAACGATCGGGAGGACCGAAAGGAGCTAACCGCTTTTTTTGCACAACATGGGGGGATCATGGTAACTCGGCCTTGATCGNTGGGGAACCGGANGCTGANTTGAAGCCCATACCAANCNNNCGAACNNNGACACCNCCGATGCNNGGTAGNCATGGNNAACCAACGGTTGCCGCAAANCTATTNAACTGGGCGAANCTACTTNACTCTAGNCTTNCCCGGGCAACAATTNAANNAAANCTGGGATGGGAGGNGGNAATAAANGTTGGCAAGGAACCNCTTNCTGGNNNNNCCGGGCCNTTNCCNGGGCTGGGNNTGGNTTNNTTGGCTTNANNAANTNNNGGNANNCCCGGNNNANNCGGGGGNATTCTCCNNNGGNNNNNNATTTGGNNNNNCCNTTGGGGGGNCCNAANANNGGNAAANNCCNNNNCCNNNGTNNNNNNNAANNTTNNNNNNNNNNCCNNAACCGGGGGNAANNNNNNNGGNNNAANNNNANGGNNNNNNAANNNNNAAANNNNNAANNNCNNNNANTTNNNTNNNAANNNNNAAGGGNNNNNNNNNNCCNANNGGAATTTNAAANCNNNNTTNNNNNNNNAANCNTGGGNNNNNNANNCCNNAANNNNTTTTNANNNNNCNNTNNANNNNAAANNCCNTTTTNNNAANNNNNNNNNNTTTTTNAANAAANNNNNNNNNNNNNNNTTTTTNNNAANNTTNTNNNNAAAAANGNNNNNTTNNNNNNNGGGGNTNNAANNNANNNNNNNNNTTTTNNTTTNNNANNNAANNTTNNNNNNNNNNNGNNNNNNNNAAAAAANTTNCCCCNNNNTTNNAAANCNTNGNNNNNNNNNNTTTTNNNNNNNT,NNNNNNNNNGGNNCNANNNNGAGGTAAAAACCATGATTATCGCAAATCAAAACAAAACAAACTCAACGAAATACACGATAAAAAAAAAAAAACAAAAACAAACCAACAAAAAAAAATATGTAAAAAAACAACCAAAAAACAAAAAAAAAATACAATCCACACTCAAAAACCATCCAAAACATTACACATTTCCCTATACATATAATATCTTAAACAACCTCTAAATACAAACCACACCCCTCTCCCCACCCCTTAACTACCCTTCCACACACCCTTCCCTACCAACCCGCCCCTGCCCTCCCCCTCTTACCGCACACCCCGCTAAATCTACTCTACCTTAACCTACAACAATACCCAATAACCCAATAACCTCCTTCCTACTACTGATAATAATTAATTAAGACGTCAGAATTCTCGAGGCGGCCGCATGTGCGTCTCCCTATAGTGAGTCGTATTAATTTCGCGGGCGGAACCCCTATTTGTTTATTTTTCTAAATACATTCAAATATGTATCCGCTCATGAGACAATAACCCTGATAAATGCTTCAATAATATTGAAAAAGGAAGAGTATGAGTATTCAACATTTCCGTGTCGCCCTTATTCCCTTTTTTGCGGCATTTTGCCTTCCTGTTTTTGCTCACCCAGAAACGCTGGTGAAAGTAAAAGATGCTGAAGATCAGTTGGGTGCACGAGTGGGTTACATCGAACTGGATCTCAACAGCGGTAAGATCCTTGAGAGTTTTCGCCCCGAAGAACGTTTTCCAATGATGAGCACTTTTAAAGTTCTGCTATGTGGCGCGGTATTATCCCGTATTGACGCCGGGCAAGAGCAACTCGGTCGCCGCATACACTATTCTCAGAATGACTTGGTTGAGTACTCACCAGTCACAGAAAAGCATCTTACGGATGGCATGACAGTAAGAGAATTATGCAGTGCTGCCATAACCATGAGTGATAACACTGCGGCCAACTTACTTCTGACAACGATCGGAGGACCGAAGGAGCTAACCGCTTTTTTGCACAACATGGGGGGATCATGTAACTCGCCTTGATCGTTGGGAACCCGGAGCTGAATGAAGCCATACCAANCGACNAANNNTGACACCACGNTGCCTNGTAGCAATGGNCANNAACNTNNNCGCAAACTAATTAACTGGGCGAACTACTTACNTCTAGCTTCCCNGGCAACAATTAANTANNNCTGGGATGGNNGGNGGNANAAAAGTTNGCAGGNACCNNTTTCTGNNNNNCGGGCCCTTNCGGNTGGNCTGGNTNANTTGGCTTNANAANTNNNGGNNNCCCGGGGNAANNNNGGNATNCTCNNGGNNNNCCTTNGGCNGNNNNTGGGGGNCCNNNNNGGNNNNAAGCCNNNCCCNNGTATCGGAANTNNNNNNNACCCCNAACNGGGGNANNNCCNNGGCCAANNNNNTGGNNTNGAACCNNAANTAAANNNNNNNCCNNNTNGNAANNNANGGNGNNNNNNNCNNNGNANNNAANNCNTTNGGNNNNAANNNGNNCNANNNNANNGNTTNNNNNNCCCNNNNNNNANCCNNTTNNANNTTNGGNNTTNANAAANNCNNNNNNNNTTNTTTTNAANTTTNAANNANNNNNNNNNNNNNNNNGGNNANNNNAANCCNNTTTTNTTNGNNNAANNNNCNCCNNNNGGNANCCCNNAAAANTNNCCCTTTNAANNNNNGGNNNNNGNTTTTTNNNNNNNNNNCCCCNNNNNNNNGNNNNNNNNNAAAANNCCCCCNNNNNNNNAAAAANNAAANNNNNNNAAANNNNNNNNTTNNNNNNNNNNNNNANNNCCNTTTNNNTTTTNNTTNNNNNNNNNGGNAAANNNNCNNNNNNNNNNNNNNGGNANNNNCCAAAAAANNACCCCCCCNNNNNNNNCCCNNNNNNGGNNNGNTTTNNNNTTNNNNNNNNNNNNNNNNNNNNNNCCCCCNCCNNNNNNNNNTNNNCCNAAANTGGNNTTNNGGGNNNNNTNNNNAAAANNNNNNNNANTAANCCNANTTTNNANGNNNNNNNTNGNANNGGNNNC,NNNNNNNNNANNACCCNCACTAANGGGNNTAGTCCTGCAGGTTTAAACGAATTCGCCCTTTATCGCAAATCAAAACAAAACAAACTCAACAAAATGCACGATAAAAAAAAAAAAACAAAAACAAACCAACAAAAAAAAATATATAAAAAAACAACCAAAAAACAAAAAAAAAAATACAAACCGCACTCAAAAACCGTCCAAAACATTACACATTCAATTTTACATATAATATCTTAAACGACCTCTAAATACGACCCACACCCCTCTCCCCACCCCTTAACTACCCTTCCACACACCCTTCCCTACCAACCCACCCCTACCCTCCTCCTCTTACCGCACACCCCGCTAAATCTACTCTACCTTAACCTACGACAATACCCAATGACCCAATAACCTCCTTCCTACTAAAGGGCGAATTCGCGGCCGCTAAATTCAATTCGCCCTATAGTGAGTCGTATTACAATTCACTGGCCGTCGTTTTACAACGTCGTGACTGGGAAAACCCTGGCNTTACCNAACTTNNNNGCCTTGANNNANANCCCCCTTNNNCNAANTNNNNNNAANNNNNNNANGCCCCNNNNNANCNCNNNNNNANNCNNNTNNCTNNNCNG,NNNNNNNNANNNNCTCACTAAAGGGNCTAGTCCTGCAGGTTTAAACGAATTCGCCCTTTATCGCAAATCAAAACAAAACAAACTCAACAAAATACACGATAAAAAAAAAAAAACAAAAACAAACCAACAAAAAAAAATATATAAAAAAACAACCAAAAAACAAAAAAAAAAATACAAACCGCACTCAAAAACCGTCCAAAACATTACACATTCAATTTTACATATAATATCTTAAACGGCCTCTAAATACGACCCACACCCCTCTCCCCACCCCTTAACTACCCTTCCACACACCCTTCCCTACCAACCCACCCCTACCCTCCCCCTCTTACCGCACACCCCACTAAATCTACTCTACCTTAACCTACGACAATACCCAATAACCCAATAACCTCCTTCCTACTAAAGGGCGAATTCGCGGCCGCTAAATTCAATTCGCCCTATAGTGAGTCGTATTACAATTCACTGGCCGTCGTTTTACAACGTCGTGACTGGGAAAACCCTGGCGTTACCCAACTTAATCGCCTTGCAGCACATCCCCCTTTCGCCAGCTGGCGTAATAGCGAAGAGGCCCGCACCGATCGCCCTTCCCAACAGTTGCGCAGCCTATACGTACGGCAGTTTAAGGTTTACACCTATAAAAGAGAGAGCCGTTATCGTCTGTTTGTGGATGTACAGAGTGATATTATTGACACGCCGGGGCGACGGATGGTGATCCCCCTGGCCAGTGCACGTCTGCTGTCAGATAAAGTCTCCCGTGAACTTTACCCGGTGGTGCATATCGGGGATGAAAGCTGGCGCATGATGACCACCGATATGGCCAGTGTGCCGGTCTCCGTTATCGGGGAAGAAGTGGCTGATCTCAGCCACCGCGAAAATGACATCAAAAACGCCATTAACCTGATGTTCTGGGGAATATAAATGTCAGGCATGAGATTATCAAAAAGGATCTTCACCTAGATCCTTTTCACGTAGAAAGCCAGTCCGCAGAAACGGTGCTGACCCCGGATGAATGTCAGCTACTGGGCTATCTGGACAAGGGAAAACGCAAGCGCAAAGAGAAAGCAGGTAGCTTGCAGTGGGCTTANNGGNNGATAGCTANACTGGNNGGNTTTTATGGNNAGCAAGCGAANCCGGATTNGCCAGCNNGGGGCGCCNTNNGGNTAAGGTTGGNAAGNCCCTGNNAANGTTAANTNGGNNTGGNTTTNNNTTGCNNNNNAAGGNNNNTGATGGGCCNNNGGG,NNNNNNANANCCTCACTAAAGGGACTAGTCCTGCAGGTTTAAACGAATTCGCCCTTTATCGCAAATCAAAACAAAACAAACTCAACAAAATACACGATAAAAAAAAAAAAACAAAAACAAACCAACAAAAAAAAATATATAAAAAAACGACCAAAAAACAAAAAAAAAAAATACAAACCGCACTCAAAAACCGTCCAAAACATTACACATTCAATTTTACATATAATATCTTAAACNACCTCTAAATACAACCCACACCCCTCTCCCCACCCCTTAACTACCCTTCCACACACCCTTCCCTACCAACCCACCCCTACCCTCCCCCTCTTACCGCACACCCCACTAAATCTACTCTACCTTAACCTACNACAATACCCAATAACCCAATAACCTCCTTCCTACTAAAGGGCGAATTCGCGGCCGCTAAATTCAATTCGCCCTATAGNNAGTCGTATTACAATTCANNGGCCGTCGTTTTACAACGTCGNNACNGGGAAAACCCTGGCGTTACCCAACTTAATCGCCTTGCAGCACATCCCCCTTTCGCCAGCTGGCGTAATAGCGAAGAGGCCCGCACCGATCGCCCTTCCCAACAGTTGCGCAGCCTATACGTACGGCAGTTTAAGGTTTACACCTATAAAANANAGAGCCGTTATCGTCTGTTTGTGGATGTACAGAGTGATATTATTGACACGCCGGGGCGACGGATGGTGATCCCCCTGGCCAGTGCACGTCTGCTGTCAGATAAAGNCTCCCGTGAACTTTACCCGGTGGTGCATATCGGGNATGAAAGCTGGCGCATGATGACCACCGATATGGCCAGTGTGCCGGTCTCCGTTATCGGGGAAGAAGTGGCTGATCTCAGCCACCGCGAAAATGACATCAAAAACGCCATTAACCTGATGTTCTGGGGAATATAAATGTCAGGCATGAGATTATCAAAAAGGATCTTCACCTANATCCTTTTCACGTAGAAAGCCAGTCCGCAGAAACGGNGCTGACCCCGGATGAATGNCAGCTACTGGGGCTATCTGGANAAGGGGAAACNGCAAGCNNNAAAGAGAAAGCAGGNANNNTTGCAAGNGGNCTTACATGGNNNNNAGCTANACTGGGNNGGTTTNATGGACNGCAAGGNNAACNGGAATTTGCCATCTTGGNNCNCNNNTCTGGTAAAGGTTNGGNNNAGCCCTTGNANNNNNNAACTGGGATGGNCTTTCCTGGNNACCAATGATCTTGATGGATNANTGGNAANCA,NNNNNNNNNNNNNCTNNCTAAAGGGNCTAGTCCTGCAGGTTTAAACGAATTCGCCCTTTATCACAAATCAAAACAAAACAAACTCAACAAAATACACAATAAAAAAAAAAAAACAAAAACAGACCAACAAAAAAAAATATATAAAAAAACAACCAAAAAACAAAAAAAAAAATACAAACCGCACTCAAAAACCATCCAAAACATTACACATCTTTACTTACATATAACATCTTAAACAACCTCTAAATACAACCCACACCCCTCTCCCCACCCCTTAACTACCCTTCCACACACCCTTCCCTACCAACCCACCCCTACCCTCCCCCTCTTACCACACACCCCACTAAATCTACTCTACCTTAACCTACAACAATACCCAATAACCCAATAACCTCCTTCCTACTAAAGGGCGAATTCGCGGCCGCTAAATTCAATTCGCCCTATAGTGAGTCGTATTACAATTCACTGGCCGTCGTTTTACAACGTCGTGACTGGGAAAACCCTGGCGTTACCCAACTTAATCGCCTTGCAGCACATCCCCCTTTCGCCAGCTGGCGTAATAGCGAAGAGGCCCGCACCGATCGCCCTTCCCAACAGTTGCGCAGCCTATACGTACGGCAGTTTAAGGTTTACACCTATAAAAGAGAGAGCCGTTATCGTCTGTTTGTGGATGTACAGAGTGATATTATTGACACGCCGGGGCGACGGATGGTGATCCCCCTGGCCAGTGCACGTCTGCTGTCAGATAAAGTCTCCCGTGAACTTTACCCGGTGGTGCATATCGGGGATGAAAGCTGGCGCATGATGACCACCGATATGGCCAGTGTGCCGGTCTCCGTTATCGGGGAAGAAGTGGCTGATCTCAGCCACCGCGAAAATGACATCAAAAACGCCATTAACCTGATGTTCTGGGGAATATAAATGTCAGGCATGAGATTATCAAAAAGGATCTTCACCTAGATCCTTTTCACGTAGAAAGCCAGTCCGCAGAAACGGTGCTGACCCCGGATGAATGTCAGCTACTGGGCTATCTGGACAAGGGAAAACGCAAGCGCAAAGAGAAAGCAGGTAGCTTGCAGTGGGCTTACATGGCGATAGCTAGACTGGNCCGGTTTTATGGACAGCAAGCGAANCCGGAATTTGCCAGCTGGGGGCGCCNTTCTGGNAANGGTTGGGAANGCCCTGNANNGTAANCTGGNNGGNNTTNNTTGCCNCCNAAGGNATCTNNATGGNNNCNNGGGNNNTCAAGNNNNGNTNCAAGAAANNAGGNATGAAGGATCGGTTNCCNNNTGATTNGANNNAAGATGGGATTGGCANNNCAGGGTTNNCNNGGCCNGCTTGGGNNNGGAANANGNCNNNTTCCGGNNNATNANCTGGGNCNNAANNNNNACAATNCNGGNNTGGCNNNNNANGCCCCCCNNNNNTTCCCNGGNCTNNNCANCNNNNAAGGGGGNCCCCNNGGGTNNNTTNTNGNNNAANNAACCNGANCCNNNNNCCCNGGNNGCCCNTTGAANNNGAANNGNNAAANNNNNANNGGCAANNCCNGGNNNNNNTNCNNNGGNCNNGGNCCCNAAAANNNGGGGGGNNTNNNNTTTNGGGNNNNNNNNNGGNNNNNNNNNNNNNTTTNNNNCNNNNNNNAANNNNNGGNAANNGNNNNNNNNNGGNNNNNNNNNNNTNNGGGGNNNANAAANNTGGCCCNGGGGGNNNNNNNNTNNCCCCNNNGGGGNANNNNNNNNNNNCNNTTGGGNNNNNNNNNNNNNNNNAAAAANNNNNNNNNCNNNNNNNNNNNNGGGGGGNNNNNNNNNNNAANNNNNGNNNGNNNNGGNNNNNNNNNNNNANCCCNNTTTNNNNNNNNNCGGGNNNNNNNNNGNNCCNNTTTNNNTNNCCNNCNNNNNNNNNNGG
";
sqs <- lapply(strsplit(sqs, split=",")[[1]], function(x){
return(casefold(str2chr(x), upper=TRUE))
});
batch <- casefold(str2chr("GACATTACACGT"), upper=TRUE);
barlen <- as.integer(8);
side <- "right";
sess <- "RJm4uIoRITeO";
sqlen <- NA;