Social Group Substitution invariance (Kamath Eq 6.13)

psi(original, counterfactual); 1 means unchanged.

Usage

morie_kamath_ch6_sgs_invariance(Yhat_i, Yhat_j, psi = NULL)

Arguments

Yhat_i, Yhat_j

Paired outputs.

psi

Optional comparator.

Value

List with estimate, per_pair, n_invariant.

Examples

V <- c(1, 2, 3, 4, 5, 6, 7, 8)
morie_kamath_ch6_sgs_invariance(V, V)
#> $estimate
#> [1] 1
#> 
#> $per_pair
#> [1] 1 1 1 1 1 1 1 1
#> 
#> $n_invariant
#> [1] 8
#> 
#> $n
#> [1] 8
#> 
#> $method
#> [1] "Social Group Substitution invariance (Kamath Eq 6.13)"
#>