Bibles

library(bibler)
library(tidyverse)
check <- bibles(language = 'grc', details = T)
check <- bibles(language = 'eng',name = 'king james', details = T)
check

books

bibleid <- '55212e3cf5d04d49-01'  #kjv
#bibleid <- '3aefb10641485092-01'
req <- books()
req

chapters

bookid <- "GEN"
ch <- chapters(bookid = 'gen')

ch

chapter

bibleid <- '55212e3cf5d04d49-01'  #kjv
bookid <- "GEN"
chapterid <- 'GEN.1'
ch <- chapter(chapterid = 'gen.1', 
              includenotes = T,
              contenttype = 'text',
              includeversenumbers = F, 
              includetitles = T,
              debug = F)
ch$content

passage

bibleid <- '55212e3cf5d04d49-01'  #kjv
bookid <- "GEN"
chapterid <- 'GEN.1'
passid <- "MAT.1.12-mat.2.20"
pdf <- passage(bibleid, 
              passid, 
              includenotes = T,
              contenttype = 'text',
              includeversespans = F,
              includeversenumbers = T, 
              includetitles = T,
              debug = F)
pdf

verses

bibleid <- '55212e3cf5d04d49-01'  #kjv
bookid <- "GEN"
chapterid <- 'GEN.1'
passid <- "MAT.1.12-mat.2.20"
vs <- verses(bibleid, 
              chapterid, 
              debug = T)
vs

verse

kjv <- '55212e3cf5d04d49-01'  #kjv
grc <- '3aefb10641485092-01' #grc
bookid <- "GEN"
chapterid <- 'GEN.1'
verseid <- 'mat.2.11'
passid <- "MAT.1.12-mat.2.20"
vs <- verse(bibleid, 
            verseid, 
            debug = F,
            parallels = c(kjv, grc))
vs

search

kjv <- 'de4e12af7f28f599-02'   #kjv
bibles(name = 'king')

search <- bible_search(kjv,
             query = 'Jesus\\?said',
             range = c('mat-jhn'),
             limit = 180,
             debug = F)
search

sections

kjv <- 'de4e12af7f28f599-02'   #kjv
bibles(name = 'king')

sects <- sections(kjv,
                  'jhn')
search


benrwoodard/bibler documentation built on Feb. 13, 2022, 1:26 p.m.