# NOT RUN {
orig <- caption(jams)
caption(jams) <- "An example table"
caption(jams)
jams
caption(jams) <- orig
# escape caption characters:
caption(jams) <- sanitize(
"Make $$$ with jam",
type = "latex")
# }
Run the code above in your browser using DataLab