Apply automatic stylistic changes

github-actions[bot] · github-actions[bot] · commit aca4a8669abd · 2023-12-07T02:27:30.000Z
diff --git a/R/line.R b/R/line.R
@@ -255,12 +255,11 @@ lineServer <- function(id, data, data_label, data_varStruct = NULL, nfactor.limi
           linetype = linetype
         )
 
-        if (input$rev_y){
+        if (input$rev_y) {
           res.plot <- res.plot + ggplot2::scale_y_reverse()
         }
 
         return(res.plot)
-
       })
 
       output$downloadControls <- renderUI({

Original file line number	Diff line number	Diff line change
`@@ -255,12 +255,11 @@ lineServer <- function(id, data, data_label, data_varStruct = NULL, nfactor.limi`
`255`	`255`	`linetype = linetype`
`256`	`256`	`)`
`257`	`257`
`258`		`- if (input$rev_y){`
	`258`	`+ if (input$rev_y) {`
`259`	`259`	`res.plot <- res.plot + ggplot2::scale_y_reverse()`
`260`	`260`	`}`
`261`	`261`
`262`	`262`	`return(res.plot)`
`263`		`-`
`264`	`263`	`})`
`265`	`264`
`266`	`265`	`output$downloadControls <- renderUI({`