diff --git a/src/.docker_modules/r-bolero/1.0/Junctions_NanoSplicer.R b/src/.docker_modules/r-bolero/1.0/Junctions_NanoSplicer.R index 3b6a1478e82d6655c286e2b4be4abcb9f10d52a6..835a0f9d86a96a6d0110c10ac9fda184a7650ff7 100644 --- a/src/.docker_modules/r-bolero/1.0/Junctions_NanoSplicer.R +++ b/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)