R functions to extract from database and typset verses in LaTeX