diff --git a/DESCRIPTION b/DESCRIPTION
index efd67df..3a85bdb 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: lfe
 Version: 2.8-1
-Date: 2018-06-30
+Date: 2018-08-20
 Title: Linear Group Fixed Effects
 Authors@R: person("Simen", "Gaure", email="Simen.Gaure@frisch.uio.no", role=c("aut","cre"))
 Copyright: 2011-2018, Simen Gaure
@@ -19,4 +19,4 @@ Classification/JEL: C13, C23, C60
 Classification/MSC: 62J05, 65F10, 65F50
 URL: https://github.com/sgaure/lfe
 BugReports: https://github.com/sgaure/lfe/issues
-RoxygenNote: 6.0.1
+RoxygenNote: 6.1.0
diff --git a/man/bccorr.Rd b/man/bccorr.Rd
index 7684588..ff2ad02 100644
--- a/man/bccorr.Rd
+++ b/man/bccorr.Rd
@@ -117,6 +117,4 @@ Gaure, S. (2014), \cite{Correlation bias correction in two-way
 \seealso{
 \code{\link{fevcov}}
 }
-\concept{
-Limited Mobility Bias
-}
+\concept{Limited Mobility Bias}
diff --git a/man/cgsolve.Rd b/man/cgsolve.Rd
index 5c7a5a2..c253422 100644
--- a/man/cgsolve.Rd
+++ b/man/cgsolve.Rd
@@ -4,7 +4,8 @@
 \alias{cgsolve}
 \title{Solve a symmetric linear system with the conjugate gradient method}
 \usage{
-cgsolve(A, b, eps = 0.001, init = NULL, symmtest = FALSE, name = "")
+cgsolve(A, b, eps = 0.001, init = NULL, symmtest = FALSE,
+  name = "")
 }
 \arguments{
 \item{A}{matrix, Matrix or function.}
diff --git a/man/felm.Rd b/man/felm.Rd
index 260c967..f7878e5 100644
--- a/man/felm.Rd
+++ b/man/felm.Rd
@@ -4,8 +4,8 @@
 \alias{felm}
 \title{Fit a linear model with multiple group fixed effects}
 \usage{
-felm(formula, data, exactDOF = FALSE, subset, na.action, contrasts = NULL,
-  weights = NULL, ...)
+felm(formula, data, exactDOF = FALSE, subset, na.action,
+  contrasts = NULL, weights = NULL, ...)
 }
 \arguments{
 \item{formula}{an object of class '"formula"' (or one that can be coerced to
diff --git a/man/getfe.Rd b/man/getfe.Rd
index c695508..21baa50 100644
--- a/man/getfe.Rd
+++ b/man/getfe.Rd
@@ -5,8 +5,8 @@
 \title{Retrieve the group fixed effects}
 \usage{
 getfe(obj, references = NULL, se = FALSE, method = "kaczmarz",
-  ef = "ref", bN = 100, robust = FALSE, cluster = obj[["clustervar"]],
-  lhs = NULL)
+  ef = "ref", bN = 100, robust = FALSE,
+  cluster = obj[["clustervar"]], lhs = NULL)
 }
 \arguments{
 \item{obj}{object of class \code{"felm"}, usually, a result of a call to
diff --git a/man/nlexpect.Rd b/man/nlexpect.Rd
index 2bda79f..d096874 100644
--- a/man/nlexpect.Rd
+++ b/man/nlexpect.Rd
@@ -4,9 +4,10 @@
 \alias{nlexpect}
 \title{Compute expectation of a function of the coefficients.}
 \usage{
-nlexpect(est, fun, coefs, ..., tol = getOption("lfe.etol"), lhs = NULL, cv,
-  istats = FALSE, flags = list(verbose = 0), max.eval = 200000L,
-  method = c("hcubature", "pcubature", "cuhre", "suave"), vectorize = FALSE)
+nlexpect(est, fun, coefs, ..., tol = getOption("lfe.etol"), lhs = NULL,
+  cv, istats = FALSE, flags = list(verbose = 0), max.eval = 200000L,
+  method = c("hcubature", "pcubature", "cuhre", "suave"),
+  vectorize = FALSE)
 }
 \arguments{
 \item{est}{object of class \code{"felm"}, a result of a call to
diff --git a/src/Crowsum.c b/src/Crowsum.c
index e24fee1..bd8a60c 100644
--- a/src/Crowsum.c
+++ b/src/Crowsum.c
@@ -5,7 +5,7 @@
 SEXP Crowsum(SEXP Rmat, SEXP Rfactor, SEXP Rmean) {
   if(!IS_NUMERIC(Rmat)) error("Only numeric matrices accepted");
   if(!isInteger(Rfactor) && !isFactor(Rfactor)) error("Only factor or integer vector accepted");
-  mybigint_t len = length(Rmat);
+  R_xlen_t len = xlength(Rmat);
   mybigint_t cols = 0, rows=0;
   int *f = INTEGER(Rfactor);
   double *mat;