In carpentries/sandpaper: Create and Curate Carpentries Lessons

There are r length(asNamespace("sandpaper")$tr_src("varnish")) translations generated by set_language() that correspond to the following variables in {varnish}:

snd <- asNamespace("sandpaper")
res <- glue::glue("| `translate.{names(tr)}` | `{sQuote(tr, q = 2)}` |", 
  tr = snd$tr_src("varnish"))
writeLines(c("| variable | string |\n| --- | --- |", res))

In addition, there are r length(asNamespace("sandpaper")$tr_src("computed")) translations that are inserted before they get to {varnish}:

snd <- asNamespace("sandpaper")
res <- glue::glue("| `{names(tr)}` | `{sQuote(tr, q = 2)}` |", 
  tr = snd$tr_src("computed"))
writeLines(c("| variable | string |\n| --- | --- |", res))