Error, siempre la misma secuencia.

This commit is contained in:
2022-07-20 12:08:31 +02:00
parent e86ada3330
commit 4e30176b88
+1 -1
View File
@@ -75,7 +75,7 @@ server <- function(input, output) {
progress <- shiny::Progress$new(min=0, max=length(seqs)) progress <- shiny::Progress$new(min=0, max=length(seqs))
for (i in 1:length(seqs)){ for (i in 1:length(seqs)){
set.seed(123) set.seed(123)
seqs_DNA<-c(seqsDNA<-reverse_translate(seqs[i],spec)) seqs_DNA<-c(seqs_DNA, reverse_translate(seqs[i],spec))
progress$set(message = "Reverse Translating", value = i) progress$set(message = "Reverse Translating", value = i)
} }
progress$close() progress$close()