Code fix

nlmixr2 · Sep 11, 2024 · 6a354b0 · 6a354b0
1 parent 5e5c219
commit 6a354b0
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/utils.R b/R/utils.R
@@ -434,8 +434,8 @@ gammapInva <- function(x, p) {
                       transform=transform, inverse=inverse)
     vapply(1:nrow(.df),
            function(i) {
-             .powerD(.df$x[i], .df$lambda[i], .df$low[i], .df$high[i],
-                     .df$transform[i], .df$inverse[i])
+             .rxTransform(.df$x[i], .df$lambda[i], .df$low[i], .df$high[i],
+                          .df$transform[i], .df$inverse[i])
     }, numeric(1), USE.NAMES = FALSE)
   } else {
     checkmate::assertNumeric(x, any.missing = FALSE)