NOMINATE Gaussian utility

Computes Poole-Rosenthal NOMINATE utilities and vote probabilities.

Usage

morie_spatial_voting_nominate_utility(x, z_yea, z_nay, beta = 15, w = NULL)

Arguments

x

Legislator ideal points (n_leg x n_dims).

z_yea

Yea outcome locations (n_votes x n_dims).

z_nay

Nay outcome locations (n_votes x n_dims).

beta

Signal-to-noise ratio.

w

Dimension weights (length n_dims; defaults to 1).

Value

List with U_yea, U_nay, utility_diff, vote_probs.

References

Poole, K. T. and Rosenthal, H. (1985); Armstrong et al. (2021), Ch. 5.

Examples

x  <- matrix(rnorm(8), 4, 2)
zy <- matrix(rnorm(6), 3, 2); zn <- matrix(rnorm(6), 3, 2)
morie_spatial_voting_nominate_utility(x, zy, zn)
#> $U_yea
#>            [,1]      [,2]      [,3]
#> [1,]  2.5342374 12.451793  7.776596
#> [2,]  5.4128477 10.578755 12.713785
#> [3,]  0.9504802  2.820774  6.978230
#> [4,] 10.8874289  6.183875  5.128900
#> 
#> $U_nay
#>           [,1]       [,2]      [,3]
#> [1,]  2.504729  0.7097981  2.487196
#> [2,] 11.197654  5.1152249  6.145742
#> [3,] 10.990940 14.7661446  1.343898
#> [4,]  4.880745  0.8646587 10.592348
#> 
#> $utility_diff
#>              [,1]       [,2]      [,3]
#> [1,]   0.02950865  11.741995  5.289400
#> [2,]  -5.78480636   5.463530  6.568043
#> [3,] -10.04046007 -11.945371  5.634332
#> [4,]   6.00668421   5.319216 -5.463448
#> 
#> $vote_probs
#>              [,1]         [,2]        [,3]
#> [1,] 5.073766e-01 9.999920e-01 0.994980538
#> [2,] 3.064486e-03 9.957793e-01 0.998597426
#> [3,] 4.359781e-05 6.489160e-06 0.996439658
#> [4,] 9.975438e-01 9.951273e-01 0.004221021
#>