# NOT RUN {
data(bankData)
bankData <- PrepData(bankData, dateNm = "date", dateGp = "months",
dateGpBp = "quarters")
data(bankLabels)
bankLabels <- PrepLabels(bankLabels)
## PlotVar will treat numerical and categorical data differently.
## Binary data is always treated as categorical.
plot(PlotVar(bankData, myVar = "duration", weightNm = NULL, dateNm = "date",
dateGp = "months", dateGpBp = "quarters", labelFl = bankLabels)$p)
plot(PlotVar(bankData, myVar = "job", weightNm = NULL, dateNm = "date",
dateGp = "months", dateGpBp = "quarters", labelFl = bankLabels)$p)
plot(PlotVar(bankData, myVar = "loan", weightNm = NULL, dateNm = "date",
dateGp = "months", dateGpBp = "quarters", labelFl = bankLabels)$p)
# }
Run the code above in your browser using DataLab