Add type_rug()

[grantmcdermott]

Closes #275

Examples from the docs (although adding a theme for effect).

pkgload::load_all("~/Documents/Projects/tinyplot")
#> ℹ Loading tinyplot

tinytheme("clean2")

tinyplot(~wt | am, data = mtcars, type = "density", facet = "by", fill = "by")
tinyplot_add(type = "rug")
# use type_rug() to pass extra options
tinyplot_add(type = type_rug(side = 3, ticksize = 0.05))

# For ties, use jittering
tinyplot(eruptions ~ waiting, data = faithful, type = "lm")
tinyplot_add(type = type_rug(jitter = TRUE, amount = 0.3))
tinyplot_add(type = type_rug(jitter = TRUE, amount = 0.1, side = 2))
# Add original points just for reference
tinyplot_add(type = "p")

^{Created on 2024-12-14 with reprex v2.1.1}

[zeileis]

Very cool 🤩