package check fixes

DESCRIPTION

@@ -45,7 +45,8 @@ Imports:
     nleqslv,
     doParallel,
     foreach,
-    parallel
+    parallel,
+    formula.tools
 LinkingTo: 
     Rcpp,
     RcppArmadillo

NAMESPACE

@@ -2,16 +2,19 @@
 
 S3method(AIC,nonprobsvy)
 S3method(BIC,nonprobsvy)
-S3method(check_balance,nonprobsvy)
 S3method(confint,nonprobsvy)
 S3method(cooks.distance,nonprobsvy)
 S3method(deviance,nonprobsvy)
 S3method(hatvalues,nonprobsvy)
 S3method(logLik,nonprobsvy)
 S3method(nobs,nonprobsvy)
+S3method(nonprobsvyby,nonprobsvy)
+S3method(nonprobsvycheck,nonprobsvy)
+S3method(nonprobsvymean,nonprobsvy)
+S3method(nonprobsvytotal,nonprobsvy)
 S3method(pop.size,nonprobsvy)
 S3method(print,nonprobsvy)
-S3method(print,nonprobsvy_balance)
+S3method(print,nonprobsvycheck)
 S3method(print,summary_nonprobsvy)
 S3method(residuals,nonprobsvy)
 S3method(summary,nonprobsvy)
@@ -23,6 +26,10 @@ export(controlSel)
 export(genSimData)
 export(logit_model_nonprobsvy)
 export(nonprob)
+export(nonprobsvyby)
+export(nonprobsvycheck)
+export(nonprobsvymean)
+export(nonprobsvytotal)
 export(pop.size)
 export(probit_model_nonprobsvy)
 import(Rcpp)
@@ -82,6 +89,7 @@ importFrom(stats,rexp)
 importFrom(stats,rnorm)
 importFrom(stats,runif)
 importFrom(stats,sd)
+importFrom(stats,setNames)
 importFrom(stats,summary.glm)
 importFrom(stats,terms)
 importFrom(stats,uniroot)
@@ -90,6 +98,7 @@ importFrom(stats,var)
 importFrom(stats,vcov)
 importFrom(stats,weighted.mean)
 importFrom(survey,as.svrepdesign)
+importFrom(survey,svyby)
 importFrom(survey,svymean)
 importFrom(survey,svyrecvar)
 importFrom(survey,svytotal)

R/prints.R

@@ -134,8 +134,9 @@ print.summary_nonprobsvy <- function(x,
 
   invisible(x)
 }
-#' @export
-print.nonprobsvy_balance <- function(x, ...) {
+#' @method print nonprobsvycheck
+#' @exportS3Method
+print.nonprobsvycheck <- function(x, ...) {
   cat("Balance check results:\n\n")
 
   # Create a data frame for nice printing
@@ -148,4 +149,5 @@ print.nonprobsvy_balance <- function(x, ...) {
   )
 
   print(results)
+  invisible(x)
 }