calc_std_diff: Calculate standardized difference
In PropensitySub: Treatment Effect Estimate in Strata with Missing Data

Description Usage Arguments Value Note Examples

Calculate standardized difference

1	calc_std_diff(vars, data0, weight0, data1, weight1)

`vars`	variables of interest. standardized difference of each variable listed here will be calculated.
`data0`	A `data.frame` which include `vars` as columns from reference arm. All data are expected to be numerical. If a column is not numerical, it will be turned to numerical by `model.matrix`.
`weight0`	weights for each record in reference arm.
`data1`	A `data.frame` which include `vars` as columns from comparison arm. All data are expected to be numerical. If a column is not numerical, it will be turned to numerical by `model.matrix`.
`weight1`	weights for each record in comparison arm.

return a numeric vector for standardized difference of each variable

Calculation from Austin and Stuart (2015)

library(dplyr)
data0 <- clinical %>% filter(ARM == "experimental")
data1 <- clinical %>% filter(ARM == "control")
calc_std_diff(
  vars = c("BECOG", "SEX"),
  data0 = data0,
  weight0 = rep(1, nrow(data0)),
  data1 = data1,
  weight1 = rep(1, nrow(data1))
 )