test_that("coefficients match Gwet for ordered", {
# Gwet (2014) pp. 89 - 90
# data(ordered)
# d <- prep_data_cat(ordered, Object, Rater, Score, weighting = "quadratic")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.