This function builds a time series chart for a given behavior across all phases. A space separates each phase. There are no connecting dots.
ABtsplot(behavior, phaseX, ABxlab, ABylab, ABmain)
behavior variable
phase variable
label for x-axis between quotation marks (e.g., "week")
label for y-axis between quotation marks (e.g., "amount")
main title graph between quotation mark (e.g., "Crying")
Charles Auerbach, PhD Wurzweiler School of Social Work Wendy Zeitlin, PhD Montclair State University
Go to www.ssdanalysis.com for more information.
cry<-c(3, 4, 2, 5, 3, 4, NA, 2, 2, 3, 2, 1, 2, NA, 2, 2, 1, 2, 1, 0, 0, 0)
pcry<-c("A", "A", "A", "A", "A", "A", NA, "B", "B", "B", "B", "B", "B", NA,
"B1", "B1", "B1", "B1", "B1", "B1", "B1", "B1")
ABtsplot(cry,pcry,"week","amount","Crying")
Run the code above in your browser using DataLab