diff --git a/app.R b/app.R index 073e2a0..b7d5fab 100644 --- a/app.R +++ b/app.R @@ -75,7 +75,7 @@ server <- function(input, output) { progress <- shiny::Progress$new(min=0, max=length(seqs)) for (i in 1:length(seqs)){ 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$close()