Error in gam_vcov = extract_vc(gam_model, digits = 5)

[abunaser69]

I am trying to use your code from the tutorial using my own data. When I ran gam_vcov = extract_vc(gam_model, digits = 5) , I get the following error:

Error in (function (..., row.names = NULL, check.rows = FALSE, check.names = TRUE, : arguments imply differing number of rows: 2, 3, 1
Traceback:

1. extract_vc.gam(gam_model, digits = 5)
2. data.frame(vc)
3. as.data.frame(x[[i]], optional = TRUE, stringsAsFactors = stringsAsFactors)
4. as.data.frame.list(x[[i]], optional = TRUE, stringsAsFactors = stringsAsFactors)
5. do.call(data.frame, c(x, alis))
6. (function (..., row.names = NULL, check.rows = FALSE, check.names = TRUE,
   . fix.empty.names = TRUE, stringsAsFactors = FALSE)
   . {
   . data.row.names <- if (check.rows && is.null(row.names))
   . function(current, new, i) {
   . if (is.character(current))
   . new <- as.character(new)
   . if (is.character(new))
   . current <- as.character(current)
   . if (anyDuplicated(new))
   . return(current)
   . if (is.null(current))
   . return(new)
   . if (all(current == new) || all(current == ""))
   . return(new)
   . stop(gettextf("mismatch of row names in arguments of 'data.frame', item %d",
   . i), domain = NA)
   . }

I would appreciate if you could help me with this error.

Kind regards,

Abu

[m-clark]

Hi Abu, I couldn't say for sure without the data, but it looks like it's happening in the underlying mgcv function (gam.vcomp). Try using gam.vcomp on your model. If you can't run that , extract_vc won't work. I suspect, but am not sure, there is maybe a data issue.

All that aside, I think there is functionality in gratia or via the easystats family of packages for this, and those packages are actively maintained and recommended. I haven't messed with this package in a long time and don't forsee that I'll be able to anytime soon.