File: zelig2bprobit.R

package info (click to toggle)
zelig 3.3-1-1
  • links: PTS
  • area: main
  • in suites: lenny
  • size: 30,800 kB
  • ctags: 470
  • sloc: sh: 81; makefile: 10
file content (16 lines) | stat: -rw-r--r-- 402 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
zelig2bprobit <- function(formula, model, data, M, ...) {
  mf <- match.call(expand.dots = TRUE)
  mf[[1]] <- VGAM::vglm
  mf$family <- as.name("bprobit")
   formula<-parse.formula(formula,model)
  tmp <- cmvglm(formula, model,3)
  mf$formula <- tmp$formula
  mf$constraints <- tmp$constraints

  mf$model <- mf$constant <- mf$M <- NULL

  as.call(mf)
}

  bprobit <- function() binom2.rho(zero=NULL)