- using R Under development (unstable) (2026-09-21 r90579 ucrt)
- using platform: x86_64-w64-mingw32
- R was compiled by
gcc.exe (GCC) 14.3.0
GNU Fortran (GCC) 14.3.0
- running under: Windows Server 2022 x64 (build 20348)
- using session charset: UTF-8
* current time: 2026-09-25 02:45:36 UTC
- checking for file 'waou/DESCRIPTION' ... OK
- this is package 'waou' version '0.1.0'
- package encoding: UTF-8
- checking package namespace information ... OK
- checking package dependencies ... OK
- checking if this is a source package ... OK
- checking if there is a namespace ... OK
- checking for hidden files and directories ... OK
- checking for portable file names ... OK
- checking whether package 'waou' can be installed ... OK
See the install log for details.
- checking installed package size ... OK
- checking package directory ... OK
- checking DESCRIPTION meta-information ... OK
- checking top-level files ... OK
- checking for left-over files ... OK
- checking index information ... OK
- checking package subdirectories ... OK
- checking code files for non-ASCII characters ... OK
- checking R files for syntax errors ... OK
- checking whether the package can be loaded ... [5s] OK
- checking whether the package can be loaded with stated dependencies ... [4s] OK
- checking whether the package can be unloaded cleanly ... [4s] OK
- checking whether the namespace can be loaded with stated dependencies ... [4s] OK
- checking whether the namespace can be unloaded cleanly ... [4s] OK
- checking loading without being on the library search path ... [5s] OK
- checking use of S3 registration ... OK
- checking dependencies in R code ... OK
- checking S3 generic/method consistency ... OK
- checking replacement functions ... OK
- checking foreign function calls ... OK
- checking R code for possible problems ... [11s] OK
- checking Rd files ... [1s] OK
- checking Rd metadata ... OK
- checking Rd cross-references ... OK
- checking for missing documentation entries ... OK
- checking for code/documentation mismatches ... OK
- checking Rd \usage sections ... OK
- checking Rd contents ... OK
- checking for unstated dependencies in examples ... OK
- checking contents of 'data' directory ... OK
- checking data for non-ASCII characters ... [1s] OK
- checking LazyData ... OK
- checking data for ASCII and uncompressed saves ... OK
- checking examples ... [9s] ERROR
Running examples in 'waou-Ex.R' failed
The error most likely occurred in:
> ### Name: calculate_weights
> ### Title: Calculate Weights
> ### Aliases: calculate_weights
>
> ### ** Examples
>
> # Prepare the NHIS data
> calVars <- c(
+ "SEX_A_R", "AGEP_A_R", "HISPALLP_A_R", "ORIENT_A_R", "HICOV_A_R", "EDUCP_A_R", "REGION_R",
+ "EMPLASTWK_A_R", "HOUTENURE_A_R", "MARITAL_A_R"
+ )
> stuVars <- "DIBTYPE_A_R"
> vars_dummies <- c("AGEP_A_R","HISPALLP_A_R","EDUCP_A_R","REGION_R")
> nhis_keep_vars <- c("PPSU","PSTRAT","WTFA_A")
> nhis_imputed <- impute_data(nhis_processed, c(calVars, stuVars), nhis_keep_vars)
iter imp variable
1 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
2 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
3 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
4 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
5 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
6 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
7 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
8 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
9 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
10 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
11 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
12 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
13 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
14 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
15 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
16 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
17 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
18 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
19 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
20 1 SEX_A_R_I AGEP_A_R_I ORIENT_A_R_I HICOV_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
> nhis_dummied <- dummies(nhis_imputed, vars=paste0(vars_dummies, '_I'))
> factor_vars <- setdiff(names(nhis_dummied), nhis_keep_vars)
> nhis_dummied[factor_vars] <- lapply(nhis_dummied[factor_vars], as.factor)
>
> # Prepare the synthetic All of Us data
> aou_imputed <- impute_data(aou_synthetic, c(calVars, stuVars))
iter imp variable
1 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
2 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
3 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
4 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
5 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
6 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
7 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
8 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
9 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
10 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
11 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
12 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
13 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
14 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
15 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
16 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
17 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
18 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
19 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
20 1 AGEP_A_R_I ORIENT_A_R_I EDUCP_A_R_I EMPLASTWK_A_R_I HOUTENURE_A_R_I MARITAL_A_R_I DIBTYPE_A_R_I
> aou_dummied <- dummies(aou_imputed, vars=paste0(vars_dummies, '_I'))
> aou_dummied[] <- lapply(aou_dummied, as.factor)
>
> # Calculate IPW weights using NHIS data and applied to All of Us
> weights_df <- calculate_weights(
+ nhis_dummied,
+ aou_dummied,
+ 'ipw',
+ paste0(calVars, '_I'),
+ paste0(stuVars, '_I'),
+ weight='WTFA_A',
+ strata='PSTRAT',
+ psu='PPSU'
+ )
Error in nonprob(selection = reformulate(aux_variables), target = reformulate(study_variables[1]), :
The outcome/target variable `DIBTYPE_A_R_I` is a factor; only numeric or logical outcomes are supported. Convert it before calling `nonprob()` (e.g. to 0/1 for `family_outcome = "binomial"`).
Calls: calculate_weights -> nonprob
Execution halted
- checking for unstated dependencies in 'tests' ... OK
- checking tests ... [6s] OK
Running 'testthat.R' [6s]
- checking PDF version of manual ... [21s] OK
- checking HTML version of manual ... [1s] OK
- DONE
Status: 1 ERROR