Modif src/.docker_modules/r-bolero/1.0/Junctions_NanoSplicer.R...

Modif src/.docker_modules/r-bolero/1.0/Junctions_NanoSplicer.R as.data.frame(single_junction) to rbind

src/.docker_modules/r-bolero/1.0/Junctions_NanoSplicer.R

@@ -293,7 +293,7 @@ for (read_id in list_read_multiple) {
 
 multiple_junction <- merge(multiple_junction, df_combinaison, by="id")
 
-df_SPvariants <- rbind(single_junction, multiple_junction)
+df_SPvariants <- rbind(as.data.frame(single_junction), multiple_junction)
 
 SP_variant_unique <- df_SPvariants %>% select(id, SP_name)
 SP_variant_unique <- SP_variant_unique[!duplicated(SP_variant_unique$id),] # distinct(SP_variant_unique, id)