clean up ordinal augment stub

bbolker · Apr 9, 2024 · 690b742 · 690b742
1 parent b1ec497
commit 690b742
Showing 1 changed file with 7 additions and 4 deletions.
diff --git a/R/ordinal_tidiers.R b/R/ordinal_tidiers.R
@@ -27,12 +27,15 @@ predict.all.clmm <- function(object, newdata, ...) {
 #' \code{ordinal} package) lives in the \code{broom} package.
 #'
 #' @importFrom tibble tibble
+#' @importFrom stats model.frame
 #' @export
-augment.clmm <- function(...,
-                         data = stats::model.frame(x), newdata, ...) {
-
-    if (!missing(newdata)) data <- newdata
+augment.clmm <- function( x,
+       data = model.frame(x),
+       ...) {
 
+    if (!missing(newdata)) data <- newdata
+
+    ## STUB
 }
 
 if (FALSE) {