Kevin Meza Landeros

Script; obtencion de anotacion de zonas de interes

...@@ -31,7 +31,7 @@ mcols(homoS) = mcols(homoS)[,c("source","type","ID","Name")] ...@@ -31,7 +31,7 @@ mcols(homoS) = mcols(homoS)[,c("source","type","ID","Name")]
31 Despues de haber trabajado nuestros datos con bowtie, utilizamos el archivo resultante .bam 31 Despues de haber trabajado nuestros datos con bowtie, utilizamos el archivo resultante .bam
32 32
33 #cargamos nuestros datos de las enfermedades monogenicas. 33 #cargamos nuestros datos de las enfermedades monogenicas.
34 -bamFile <- "/home/aschafer/Documentos/Genomicas/Semestre_4/Genomica_humana/Enfermedades_monogenicas/sequences_aligned_A_sort.bam" 34 +bamFile <- "/home/aschafer/Documentos/Genomicas/Semestre_4/Genomica_humana/Enfermedades_monogenicas/sequences_aligned_sort.bam"
35 informacion <- c("rname", "strand", "pos", "qwidth") 35 informacion <- c("rname", "strand", "pos", "qwidth")
36 informacion <- ScanBamParam(what = informacion) 36 informacion <- ScanBamParam(what = informacion)
37 bam <- scanBam(bamFile, param = informacion) 37 bam <- scanBam(bamFile, param = informacion)
......