The pseudo observations is defined as \(Y_{ij}^* = I(Y_i \preceq Y_j)\).

create_pseudo_obs(y)

Arguments

y

numeric

Value

\(Y_{ij}^*\) as an vector with length length(y)^2.

Examples

create_pseudo_obs(c(-1, 0, 1))
#> [1] 0.5 1.0 1.0 0.0 0.5 1.0 0.0 0.0 0.5