WEAT differential association (Kamath Eq 6.5)

s(a) = mean cos(a, W_1) - mean cos(a, W_2).

Usage

morie_kamath_ch6_weat_similarity(a, W_1, W_2)

Arguments

a

Attribute vector.

W_1, W_2

Target word matrices.

Value

List with estimate, mean_cos_W1, mean_cos_W2.

Examples

W1 <- diag(2)
W2 <- -diag(2)
morie_kamath_ch6_weat_similarity(c(1, 0), W1, W2)
#> $estimate
#> [1] 1
#> 
#> $mean_cos_W1
#> [1] 0.5
#> 
#> $mean_cos_W2
#> [1] -0.5
#> 
#> $n
#> [1] 2
#> 
#> $method
#> [1] "WEAT differential association s (Kamath Eq 6.5)"
#>