R/rplackett_luce.R

In dcbdan/s525: Implementation of common Bayesian models

Defines functions rplackett_luce

Documented in rplackett_luce

rplackett_luce <- function(n, vs)
{
  # return a n by k matrix. Each row contains
  # a permutation
  k <- length(vs)
  t(replicate(n, sample.int(k, prob = vs)))
}