Nothing
#' Object for Binary Choice outcomes with Survey Weights
#' for inheritance across models in Zelig
#'
#' @import methods
#' @export Zelig-binchoice-survey
#' @exportClass Zelig-binchoice-survey
#'
#' @include model-zelig.R
#' @include model-binchoice.R
#' @include model-survey.R
zbinchoicesurvey <- setRefClass("Zelig-binchoice-survey",
contains = c("Zelig-survey",
"Zelig-binchoice"))
zbinchoicesurvey$methods(
initialize = function() {
callSuper()
.self$family <- "binomial"
.self$category <- "continuous"
# JSON from parent
}
)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.