diff --git a/R/feglm_offset.R b/R/feglm_offset.R
index e9e9d59..cec4faf 100644
--- a/R/feglm_offset.R
+++ b/R/feglm_offset.R
@@ -20,7 +20,7 @@ feglm_offset_ <- function(object, offset) {
   wt <- object[["weights"]]
   family <- object[["family"]]
   lvls_k <- object[["lvls_k"]]
-  nt <- object[["nobs"]][["nobs"]]
+  nt <- object[["nobs"]][["nobs_full"]] - object[["nobs"]][["nobs_pc"]]
   k_vars <- names(lvls_k)
 
   # Extract dependent variable
diff --git a/dev/issue8.r b/dev/issue8.r
new file mode 100644
index 0000000..be77685
--- /dev/null
+++ b/dev/issue8.r
@@ -0,0 +1,14 @@
+devtools::load_all()
+
+# install.packages("bife")
+data(psid, package = "bife")
+
+lmod = feglm(
+  LFP ~ KID1 + KID2 + KID3 + log(INCH) | ID + TIME,
+  data   = psid,
+  family = binomial()
+  )
+
+summary(lmod)
+
+bias_corr(lmod)