add_content | R Documentation |
This function adds an object to the report content list. A
report will accept multiple pieces of content. The add_content
function also controls overall alignment of the content on the page, and
whether there is a page break before or after.
add_content(
x,
object,
page_break = TRUE,
align = "center",
blank_row = "below"
)
x |
The report_spec to append content to. |
object |
The object to append. |
page_break |
Whether to add a page break after the object.
Valid values are TRUE or FALSE. You can manipulate the |
align |
How to align the content. Valid values are 'left', 'right', 'center', and 'centre'. |
blank_row |
Whether to put a blank row above or below the content. Valid values are 'above', 'below', 'both', or 'none'. |
The add_content
function adds a piece of content to a report. For a
text report, valid objects are a table or text object. For an RTF, PDF,
HTML, or DOCX report, valid objects are a table, text, or plot object. See
create_table
, create_text
, or
create_plot
for further
information on how to create content objects.
Content will be
appended to the report in the order it is added. By default, a page break
is added after the content. You can stack two pieces of content together
closely by setting the page_break
parameter to FALSE, and
the blank_row
parameter to "none".
The modified report_spec.
create_table
, create_text
, and
create_plot
to create content for a report.
Other report:
create_report()
,
footnotes()
,
options_fixed()
,
page_by()
,
page_footer()
,
page_header()
,
print.report_spec()
,
set_margins()
,
title_header()
,
titles()
,
write_report()
library(reporter)
library(magrittr)
# Create temp file path
tmp <- file.path(tempdir(), "mtcars.txt")
# Create first table
tbl1 <- create_table(mtcars[1:5, 1:6]) %>%
column_defaults(width = .5)
# Create second table
tbl2 <- create_table(mtcars[6:10, 1:6], headerless=TRUE) %>%
column_defaults(width = .5)
# Create the report object
rpt <- create_report(tmp) %>%
titles("MTCARS Sample Data", align = "left") %>%
add_content(tbl1, page_break = FALSE, align = "left", blank_row = "none") %>%
add_content(tbl2, page_break = FALSE, align = "left") %>%
add_content(create_text("* NOTE: Above table is actually two tables stacked."))
# Write the report to the file system
res <- write_report(rpt)
# Write report to console
writeLines(readLines(tmp, encoding = "UTF-8"))
# MTCARS Sample Data
#
# mpg cyl disp hp drat wt
# -----------------------------------------
# 21 6 160 110 3.9 2.62
# 21 6 160 110 3.9 2.875
# 22.8 4 108 93 3.85 2.32
# 21.4 6 258 110 3.08 3.215
# 18.7 8 360 175 3.15 3.44
# 18.1 6 225 105 2.76 3.46
# 14.3 8 360 245 3.21 3.57
# 24.4 4 146.7 62 3.69 3.19
# 22.8 4 140.8 95 3.92 3.15
# 19.2 6 167.6 123 3.92 3.44
#
# * NOTE: Above table is actually two tables stacked.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.