Fix vpcPlot()

nlmixr2 · Sep 1, 2022 · 97966ec · 97966ec
1 parent 734ad73
commit 97966ec
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 5 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -2,12 +2,12 @@ Package: nlmixr2plot
 Title: Nonlinear Mixed Effects Models in Population PK/PD, Plot Functions
 Version: 2.0.6
 Authors@R: c(
-    person("Matthew", "Fidler", , "matthew.fidler@gmail.com", role = c("aut", "cre"),
+    person("Matthew", "Fidler", email="matthew.fidler@gmail.com", role = c("aut", "cre"),
            comment = c(ORCID = "0000-0001-8538-6691")),
-    person("Bill", "Denney", , "wdenney@humanpredictions.com", role = "ctb",
+    person("Bill", "Denney", email="wdenney@humanpredictions.com", role = "ctb",
            comment = c(ORCID = "0000-0002-5759-428X")),
-    person("Wenping", "Wang", , "wwang8198@gmail.com", role = "aut"),
-    person("Vipul", "Mann", , "vm2583@columbia.edu", role = "aut")
+    person("Wenping", "Wang", email="wwang8198@gmail.com", role = "aut"),
+    person("Vipul", "Mann", email="vm2583@columbia.edu", role = "aut")
   )
 Description: Fit and compare nonlinear mixed-effects models in
     differential equations with flexible dosing information commonly seen

diff --git a/R/vpcPlot.R b/R/vpcPlot.R
@@ -72,7 +72,7 @@ vpcPlot <- function(fit, data = NULL, n = 300, bins = "jenks",
     }
   }
   # Simulate with VPC
-  if (inheirts(fit, "nlmixr2vpcSim")) {
+  if (inherits(fit, "nlmixr2vpcSim")) {
     .sim <- fit
   } else {
     .sim <- nlmixr2est::vpcSim(fit, ..., keep=stratify, n=n, pred=pred_corr, seed=seed)