The function is concatenating text and images within paragraphs of
a flextable object, this function is to be used with function compose().
as_paragraph(..., list_values = NULL)chunk elements that are defining paragraph
a list of chunk elements that are defining paragraph. If
specified argument ... is unused.
as_chunk(), minibar(),
as_image(), hyperlink_text()
Other functions for mixed content paragraphs:
append_chunks(),
compose(),
prepend_chunks()
library(flextable)
ft <- flextable(airquality[sample.int(150, size = 10), ])
ft <- compose(ft,
j = "Wind",
value = as_paragraph(
as_chunk(Wind, props = fp_text_default(color = "orange")),
" ",
minibar(value = Wind, max = max(airquality$Wind), barcol = "orange", bg = "black", height = .15)
),
part = "body"
)
ft <- autofit(ft)
ft
Run the code above in your browser using DataLab