Skip to content

Commit

Permalink
Remove redundant code
Browse files Browse the repository at this point in the history
  • Loading branch information
manszamore committed Feb 6, 2023
1 parent 2b98a5e commit e4a53ab
Showing 1 changed file with 1 addition and 3 deletions.
4 changes: 1 addition & 3 deletions R/reactive_values.R
Original file line number Diff line number Diff line change
Expand Up @@ -18,10 +18,8 @@ setup_reactive_values_obj <- function(input) {

if (is_design_file) {
raw_df <- raw_df %>%
mutate_all(make.names)
mutate_all(make.names) # Run make.names on all elements of the design matrix
} else {
original_colnames <- colnames(raw_df)
corrected_colnames <- make.names(colnames(raw_df))
colnames(raw_df) <- make.names(colnames(raw_df))
}

Expand Down

0 comments on commit e4a53ab

Please sign in to comment.