
Last chance! 50% off unlimited learning
Sale ends in
PlotDesc(x, ..., wrd = NULL)
## S3 method for class 'default':
PlotDesc(x, ...)
## S3 method for class 'integer':
PlotDesc(x, main = deparse(substitute(x)),
ord = c("val_asc","val_desc","frq_asc","frq_desc"),
maxrows = 10, ... , wrd = NULL)
## S3 method for class 'numeric':
PlotDesc(x, main = deparse(substitute(x)), ...,
wrd = NULL)
## S3 method for class 'factor':
PlotDesc(x, main = deparse(substitute(x)),
ord = c("desc", "level", "name", "asc", "none"),
maxrows = 10, lablen = 25, type = c("bar","dot"),
col = hblue, ..., wrd = NULL)
## S3 method for class 'table':
PlotDesc(x, col0 = hred, col1=hblue,
horiz = TRUE, main="", ..., wrd = NULL)
## S3 method for class 'ordered':
PlotDesc(x, ..., wrd = NULL)
## S3 method for class 'data.frame':
PlotDesc(x, ..., wrd = NULL)
## S3 method for class 'logical':
PlotDesc(x, xlab = "", col0 = hblue, col1 = hred, ...,
wrd = NULL)
## S3 method for class 'Date':
PlotDesc(x, breaks = "month", ..., wrd = NULL)
PlotDescNumFact(formula, data, main=deparse(formula), notch=FALSE,
add_ni = TRUE, ..., wrd = NULL)
PlotDescNumNum(form1, form2, data, ..., wrd = NULL)
"bar"
for a horizontal barchart or "dot"
for a dotchart.TRUE
).GetNewWrd()
or an existing one, created by GetCurrWrd()
.
Default is the last created pointer stored in getOption("lastWord")
.Desc
PlotDesc(x=na.omit(d.pizza$delivery_min)) # numeric
PlotDesc(x=na.omit(d.pizza$week)) # integer
PlotDesc(x=na.omit(d.pizza$driver)) # factor
PlotDesc(x=na.omit(d.pizza$quality)) # ordered factor
PlotDesc(x=na.omit(d.pizza$wrongpizza)) # logical
PlotDesc(x=na.omit(d.pizza$date)) # Date
d.frm <- d.pizza[,c("price","operator")]
d.frm <- d.frm[complete.cases(d.frm),]
PlotDescNumFact(temperature ~ driver, data=d.pizza) # numeric ~ factor
PlotDesc(table(d.pizza$driver, d.pizza$operator)) # factor ~ factor
Run the code above in your browser using DataLab