R/ind.u.R

Defines functions ind.u

Documented in ind.u

ind.u = function(pr){
  n = nrow(pr)
  K = ncol(pr)

  output = rep(0, n) 
  out<-.C("multinomind", as.double(t(pr)), as.integer(n), as.integer(K), as.integer(output), PACKAGE="BHTSpack")
  return(out[[4]])
}

Try the BHTSpack package in your browser

Any scripts or data that you put into this service are public.

BHTSpack documentation built on Feb. 8, 2021, 5:07 p.m.