Skip to content

Commit

Permalink
feat: export utils
Browse files Browse the repository at this point in the history
  • Loading branch information
KaiAragaki committed May 6, 2024
1 parent 87d2e9b commit 47687a2
Showing 1 changed file with 2 additions and 0 deletions.
2 changes: 2 additions & 0 deletions R/utils.R
Original file line number Diff line number Diff line change
Expand Up @@ -14,6 +14,7 @@ f_or_na <- function(x) {
#' make_pipette_vol(9.9211)
#' # Vectorized:
#' make_pipette_vol(c(104.13398, 15.3331, 9.9211, NA, -100.1))
#' @export
make_pipette_vol <- function(x) {
a <- abs(x)
a <- dplyr::case_when(
Expand Down Expand Up @@ -45,6 +46,7 @@ make_pipette_vol <- function(x) {
#' dilute(203, 70, 10, round_for_pipettes = FALSE)
#' # Vectorized:
#' dilute(c(8, 10, 12), c(4, 5, 6), c(7, 8, 9))
#' @export
dilute <- function(c1,
c2 = min(c1),
v2,
Expand Down

0 comments on commit 47687a2

Please sign in to comment.