Get a primary text by URN.

get_perseus_text(urn, excerpt = NULL)

Arguments

urn

Valid uniform resource number (URN) obtained from perseus_catalog.

excerpt

An index to excerpt the text. For example, the first four "verses" of a text might be 1.1-1.4. If NULL, the entire work is returned.

Value

A seven column tbl_df with one row for each "section" (splits vary from text--could be line, chapter, etc.). Columns:

text

character vector of text

urn

Uniform Resource Number

group_name

Could refer to author (e.g. "Aristotle") or corpus (e.g. "New Testament")

label

Text label, e.g. "Phaedrus"

description

Text description

language

Text language, e.g. "grc" = Greek, "lat" = Latin, "eng" = English

section

Text section or excerpt if specified

Examples

get_perseus_text("urn:cts:greekLit:tlg0013.tlg028.perseus-grc2")
#> # A tibble: 18 x 7 #> text #> <chr> #> 1 Παλλάδ᾽ Ἀθηναίην, κυδρὴν θεόν, ἄρχομ᾽ ἀείδειν #> 2 γλαυκῶπιν, πολύμητιν, ἀμείλιχον ἦτορ ἔχουσαν, #> 3 παρθένον αἰδοίην, ἐρυσίπτολιν, ἀλκήεσσαν, #> 4 Τριτογενῆ, τὴν αὐτὸς ἐγείνατο μητίετα Ζεὺς #> 5 σεμνῆς ἐκ κεφαλῆς, πολεμήια τεύχε᾽ ἔχουσαν, #> 6 χρύσεα, παμφανόωντα: σέβας δ᾽ ἔχε πάντας ὁρῶντας #> 7 ἀθανάτους: ἣ δὲ πρόσθεν Διὸς αἰγιόχοιο #> 8 ἐσσυμένως ὤρουσεν ἀπ᾽ ἀθανάτοιο καρήνου, #> 9 σείσασ᾽ ὀξὺν ἄκοντα: μέγας δ᾽ ἐλελίζετ᾽ Ὄλυμπος #> 10 δεινὸν ὑπὸ βρίμης γλαυκώπιδος: ἀμφὶ δὲ γαῖα #> 11 σμερδαλέον ἰάχησεν: ἐκινήθη δ᾽ ἄρα πόντος, #> 12 κύμασι πορφυρέοισι κυκώμενος: ἔκχυτο δ᾽ ἅλμη #> 13 ἐξαπίνης: στῆσεν δ᾽ Ὑπερίονος ἀγλαὸς υἱὸς #> 14 ἵππους ὠκύποδας δηρὸν χρόνον, εἰσότε κούρη #> 15 εἵλετ᾽ ἀπ᾽ ἀθανάτων ὤμων θεοείκελα τεύχη #> 16 Παλλὰς Ἀθηναίη: γήθησε δὲ μητίετα Ζεύς. #> 17 καὶ σὺ μὲν οὕτω χαῖρε, Διὸς τέκος αἰγιόχοιο: #> 18 αὐτὰρ ἐγὼ καὶ σεῖο καὶ ἄλλης μνήσομ᾽ ἀοιδῆς. #> # ... with 6 more variables: urn <chr>, group_name <chr>, label <chr>, #> # description <chr>, language <chr>, section <int>
get_perseus_text("urn:cts:latinLit:stoa0215b.stoa003.opp-lat1")
#> # A tibble: 69 x 7 #> text #> <chr> #> 1 f Tibique, Domine, celsum Cherubim dicatum est, #> 2 et illa moles quadriformis machinae #> 3 te sempiterno confitentur carmine. #> 4 et nos imago consonantis cantici #> 5 amen sonamus, alleluia dicimus. #> 6 Te septem primi deprecantur angeli, #> 7 ceu ciuitatis septem principes uiri, #> 8 solio propinqui, ianitores proximi. #> 9 et nos imago consonantis cantici #> 10 amen sonamus, alleluia dicimus. #> # ... with 59 more rows, and 6 more variables: urn <chr>, group_name <chr>, #> # label <chr>, description <chr>, language <chr>, section <int>
get_perseus_text(urn = "urn:cts:greekLit:tlg0031.tlg009.perseus-grc2", excerpt = "5.1-5.5")
#> # A tibble: 1 x 7 #> text #> <chr> #> 1 Τῇ ἐλευθερίᾳ ἡμᾶς Χριστὸς ἠλευθέρωσεν· στήκετε οὖν καὶ μὴ πάλιν ζυγῷ δουλείας ἐν #> # ... with 6 more variables: urn <chr>, group_name <chr>, label <chr>, #> # description <chr>, language <chr>, section <chr>