R/create_pseudo_obs.R
create_pseudo_obs.Rd
The pseudo observations is defined as \(Y_{ij}^* = I(Y_i \preceq Y_j)\).
create_pseudo_obs(y)
numeric
\(Y_{ij}^*\) as an vector with length length(y)^2.
length(y)^2
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