#' Function plotTIC
#'
#' Plots Test Information Curve based on a TAM model.
#' @export
plotTIC <- function (model, main = "IRT - Test Information Curve")
plot(TAM::IRT.informationCurves(model), main = main)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.