fix #1178

Author: mattansb

DESCRIPTION

@@ -1,7 +1,7 @@
 Type: Package
 Package: parameters
 Title: Processing of Model Parameters
-Version: 0.28.2.9
+Version: 0.28.2.10
 Authors@R:
     c(person(given = "Daniel",
              family = "Lüdecke",

NEWS.md

@@ -1,5 +1,8 @@
 # parameters (devel)
 
+* fixed bug in `standardize_info(<fixest>)` that was preventing 
+  `standardise_parameters()` from working for `fixest` models.
+
 * `equivalence_test()` gets methods for objects from the *modelbased* package.
 
 * Improved support for objects from package *survey*.

R/standardize_info.R

@@ -50,7 +50,6 @@ standardize_info.default <- function(model,
     insight::find_parameters(model, effects = "fixed", flatten = TRUE, ...)
   }
   types <- parameters_type(model)
-  # model_matrix <- as.data.frame(stats::model.matrix(model))
   model_matrix <- as.data.frame(insight::get_modelmatrix(model))
   model_data <- insight::get_data(model, source = "mf", verbose = FALSE)
   wgts <- insight::get_weights(model, remove_na = TRUE)
@@ -321,11 +320,8 @@ standardize_info.default <- function(model,
 #' @keywords internal
 .std_info_response_smart <- function(model, info, data, model_matrix, types, robust = FALSE, w = NULL, ...) {
   if (info$is_linear) {
-    if (inherits(model, c("gls", "lme"))) {
-      response <- insight::get_response(model)
-    } else {
-      response <- stats::model.frame(model)[[1]]
-    }
+    response <- insight::get_response(model)
+
     means <- deviations <- rep(NA_real_, length = length(names(model_matrix)))
     for (i in seq_along(names(model_matrix))) {
       variable <- names(model_matrix)[i]
@@ -365,11 +361,7 @@ standardize_info.default <- function(model,
 
 #' @keywords internal
 .std_info_response_basic <- function(model, info, params, robust = FALSE, w = NULL, ...) {
-  if (inherits(model, c("gls", "lme"))) {
-    response <- insight::get_response(model)
-  } else {
-    response <- stats::model.frame(model)[[1]]
-  }
+  response <- insight::get_response(model)
 
   if (info$is_linear) {
     if (robust) {