# \donttest{
# Estimate tau, then plot:
# dat <- reshape_projoint(exampleData1, .outcomes = c("choice1","choice2"))
# tau_fit <- projoint_tau(dat) # or predict_tau(dat)
# p <- plot(tau_fit) # also returns the ggplot object (invisibly)
# }
Run the code above in your browser using DataLab