styler

nmdefries · nmdefries · commit 8aa6ddb75c54 · 2023-03-30T18:20:53.000-04:00
diff --git a/app/R/data_manipulation.R b/app/R/data_manipulation.R
@@ -1,4 +1,3 @@
-
 renameScoreCol <- function(filteredScoreDf, scoreType, coverageInterval) {
   if (scoreType == "wis") {
     filteredScoreDf <- filteredScoreDf %>% rename(Score = wis)
diff --git a/app/R/delphiLayout.R b/app/R/delphiLayout.R
@@ -1,4 +1,3 @@
-
 # create a common delphi header
 delphiHeaderUI <- function(id = "delphi-header", title = "My App") {
   # Get css file
diff --git a/app/R/exportScores.R b/app/R/exportScores.R
@@ -1,4 +1,3 @@
-
 exportScoresUI <- function(id = "exportScores") {
   ns <- shiny::NS(id)
   div(

Original file line number	Diff line number	Diff line change
`@@ -1,4 +1,3 @@`
`1`		`-`
`2`	`1`	`renameScoreCol <- function(filteredScoreDf, scoreType, coverageInterval) {`
`3`	`2`	`if (scoreType == "wis") {`
`4`	`3`	`filteredScoreDf <- filteredScoreDf %>% rename(Score = wis)`
Original file line number	Diff line number	Diff line change
`@@ -1,4 +1,3 @@`
`1`		`-`
`2`	`1`	`# create a common delphi header`
`3`	`2`	`delphiHeaderUI <- function(id = "delphi-header", title = "My App") {`
`4`	`3`	`# Get css file`
Original file line number	Diff line number	Diff line change
`@@ -1,4 +1,3 @@`
`1`		`-`
`2`	`1`	`exportScoresUI <- function(id = "exportScores") {`
`3`	`2`	`ns <- shiny::NS(id)`
`4`	`3`	`div(`