diff --git a/app/server.r b/app/server.r
index fb5ae86..1de3759 100644
--- a/app/server.r
+++ b/app/server.r
@@ -400,16 +400,16 @@ function(input, output, session) {
plot_pca_batch <- eventReactive(input$plot_batch, {
#get plot
- plot_pca_batch <- plotly_pca <- plotly_pca(experiments_info_meta = experiments_info_meta(),
- filtered_score_matrix = batch_adjusted_matrix()[[input$corrected_matrices]],
- name = input$corrected_matrices,
- project = input$project,
- type_of_score = input$type_of_score,
- color_by = input$color_by_batch,
- epigenetic_mark = input$epigenetic_mark,
- first_pc = input$first_pc_batch,
- second_pc = input$second_pc_batch,
- show_legend = TRUE)
+ plot_pca_batch <- plotly_pca(experiments_info_meta = experiments_info_meta(),
+ filtered_score_matrix = batch_adjusted_matrix()[[input$corrected_matrices]],
+ name = input$corrected_matrices,
+ project = input$project,
+ type_of_score = input$type_of_score,
+ color_by = input$color_by_batch,
+ epigenetic_mark = input$epigenetic_mark,
+ first_pc = input$first_pc_batch,
+ second_pc = input$second_pc_batch,
+ show_legend = TRUE)
showTab(inputId = "batch_plot_box", target = "Download Plot")