View source: R/multifield3logit.R
| multifield3logit | R Documentation |
Methods of S3 class multifield3logit handle multiple fields3logit
objects simultaneously and permit new multifield3logit objects to be
easily created by means of the sum operator "+".
multifield3logit(x, ...)
## S3 method for class 'Hfield3logit'
x + y
## S3 method for class 'multifield3logit'
print(x, maxitems = 10, ...)
## S3 method for class 'multifield3logit'
plot(x, y = NULL, add = FALSE, col = NA, legend = TRUE, ...)
## S3 method for class 'multifield3logit'
as_tibble(x, ..., wide = TRUE)
## S3 method for class 'multifield3logit'
as.data.frame(x, ..., wide = TRUE)
## S3 method for class 'multifield3logit'
fortify(model, data, ..., wide = TRUE)
## S3 method for class 'multifield3logit'
tidy(x, ..., wide = TRUE)
## S3 method for class 'multifield3logit'
labels(object, ...)
## S3 replacement method for class 'multifield3logit'
labels(object) <- value
## S3 method for class 'multifield3logit'
x[i, drop = TRUE]
## S3 replacement method for class 'multifield3logit'
x[i] <- value
x, y, model, object |
object of class |
... |
other arguments passed to or from other methods. |
maxitems |
maximum number of items to be enumerated when an object of
class |
add |
|
col, legend |
graphical parameters if |
wide |
it allows to choose whether |
data |
not used. Argument included only for interface compatibility with
the generic |
value |
value to be assigned. |
i |
index of the |
drop |
if |
S3 object of class multifield3logit structured as a named
list.
field3logit().
data(cross_1year)
mod0 <- nnet::multinom(employment_sit ~ ., data = cross_1year)
mod0
field_Sdur <- field3logit(mod0, 'durationShort',
label = 'Short duration')
field_Hfgr <- field3logit(mod0, 'finalgradeHigh',
label = 'High final grade')
gg3logit(field_Sdur + field_Hfgr) +
stat_field3logit()
facet_wrap(~ label)
refpoint <- list(c(0.7, 0.15, 0.15))
field_Sdur <- field3logit(mod0, 'durationShort',
label = 'Short duration', p0 = refpoint, narrows = 1)
field_Ldur <- field3logit(mod0, 'durationLong',
label = 'Long duration', p0 = refpoint, narrows = 1)
field_Hfgr <- field3logit(mod0, 'finalgradeHigh',
label = 'High final grade', p0 = refpoint, narrows = 1)
field_Lfgr <- field3logit(mod0, 'finalgradeLow',
label = 'Low final grade', p0 = refpoint, narrows = 1)
mfields <- field_Sdur + field_Ldur + field_Lfgr + field_Hfgr
mfields
gg3logit(mfields) +
stat_field3logit(aes(colour = label)) +
theme_zoom_L(0.45)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.