Skip to content

Commit

Permalink
refactor: appease lintr
Browse files Browse the repository at this point in the history
  • Loading branch information
bczech committed May 13, 2024
1 parent 6f53228 commit 74917a0
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion R/add_annotation.R
Original file line number Diff line number Diff line change
Expand Up @@ -282,7 +282,7 @@ remove_drug_batch <- function(drug) {
get_drug_annotation_from_dt <- function(dt) {
checkmate::assert_data_table(dt)
drug_cols <- intersect(gDRutils::get_env_identifiers()
[grep("drug",names(gDRutils::get_env_identifiers()))],
[grep("drug", names(gDRutils::get_env_identifiers()))],
names(dt))
dt_drug <- dt[, unlist(drug_cols), with = FALSE]
dt_long <- data.table::melt(dt_drug,
Expand Down

0 comments on commit 74917a0

Please sign in to comment.