Description Usage Format Examples
A subset of tipitaka_names consisting of only the books of
the Sutta Pitaka. These are easier to read if you call
stringi::stri_unescape_unicode
first.
1 |
A tibble with the variables:
Abbreviated title
Full title
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | # Clean up the Unicode characters to make things more readble:
sutta_pitaka$name <-
stringi::stri_unescape_unicode(sutta_pitaka$name)
# Count all the words in the Suttas:
sum(
unique(
tipitaka_long[tipitaka_long$book %in% sutta_pitaka$book, "total"]))
# Count another way:
sum(tipitaka_long[tipitaka_long$book %in% sutta_pitaka$book, "n"])
# Create a tibble of just the Suttas
sutta_wide <-
tipitaka_wide[row.names(tipitaka_wide) %in% sutta_pitaka$book,]
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.