Allow for a normal data.frame to be converted to Govspeak

[matt-dray]

Would be nice to be able to convert from a data.frame to Govspeak to allow for extraction and conversion of all tables found in a Word doc, as per matt-dray/govspeakify-tables#2.

library(officer)

doc_1 <- officer::read_docx() |>
  body_add_par("Hello world!", style = "heading 1") |>
  body_add_par("", style = "Normal") |>
  body_add_table(airquality, style = "table_template") |> 
  body_add_par("Hello world!", style = "heading 1") |>
  body_add_par("", style = "Normal") |>
  body_add_table(iris, style = "table_template") |> 
  body_add_par("Hello world!", style = "heading 1") |>
  body_add_par("", style = "Normal") |>
  body_add_table(mtcars, style = "table_template")

print(doc_1, target = "~/Desktop/example_1.docx")

tables <- docxtractr::read_docx("~/Desktop/example_1.docx") |> 
  docxtractr::docx_extract_all_tbls()

lapply(tables, wordup::table_to_govspeak)  # errors, doesn't expect a df