# create multiple sorts ====
# simple case with one condition of instruction
csorts <- matrix(
data = c(-1, 0, 1, -1),
nrow = 2,
byrow = TRUE,
dimnames = list(
people = c("Lisa", "Peter"),
items = c("live_2_work", "work_2_live")
)
)
csorts <- psClosedSorts(csorts)
# you can coerce a *row* (person) of a 'psClosedSorts' object from a *single* "raw" psSort
csorts_from_one_sort <- as_psClosedSorts(obj = one_sort)
# this also works for psSort with offsets
csorts_from_one_sort_hex <- as_psClosedSorts(obj = one_sort_from_vec_hex)
# it is recommended to also supply 'items' to the coercion
# so that items are properly ordered and missing items set to NA
csorts_w_items <- as_psClosedSorts(
obj = one_sort,
items = c("work_2_live", "live_2_work", "enjoy_work")
# you can pass a proper 'psItemContent' object to items, but also just item handles
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.