Skip to content

Commit

Permalink
attaching package to na.omit functions for checking coverage
Browse files Browse the repository at this point in the history
  • Loading branch information
DBartlettHP committed Jan 7, 2025
1 parent 7cd017f commit d885850
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions R/class-PKNCAdata.R
Original file line number Diff line number Diff line change
Expand Up @@ -183,14 +183,14 @@ PKNCAdata.default <- function(data.conc, data.dose, ...,

unit_args <- conc_units_values
for (nm in names(conc_units_cols)) {
unit_args[[nm]] <- unique(na.omit(ret$conc$data[[conc_units_cols[[nm]]]]))
unit_args[[nm]] <- unique(stats::na.omit((ret$conc$data[[conc_units_cols[[nm]]]]))
}

if (!identical(ret$dose, NA)) {
unit_args <- append(unit_args, ret$dose$units)
dose_units_cols <- ret$dose$columns[names(ret$dose$columns) %in% possible_units]
for (nm in names(dose_units_cols)) {
unit_args[[nm]] <- unique(na.omit(ret$dose$data[[dose_units_cols[[nm]]]]))
unit_args[[nm]] <- unique(stats::na.omit((ret$dose$data[[dose_units_cols[[nm]]]]))
}
}
# If there are any units to set, set them here
Expand Down

0 comments on commit d885850

Please sign in to comment.