powered by
Partial credit plot
partial_credit_biplot(pc_object, ...)
a plot object
an object returned by partial_credit_analysis()
partial_credit_analysis()
additional arguments for other functions
grade.key <- c(100, 60, 0) y1 <- c(60, 30, 10) y2 <- c(50, 40, 10) pc_object <- partial_credit_analysis(grade_key = grade.key, y1 = y1, y2 = y2) partial_credit_biplot(pc_object)
Run the code above in your browser using DataLab