Add an external document into a document object

Description

Add an external document into a document object

Usage

addDocument(doc, filename, ...)

## S3 method for class 'docx'
addDocument(doc, filename, ...)

Arguments

Details

ReporteRs does only copy the document as an external file. Headers and footers are also imported and displayed. This function is not to be used to merge documents.

Value

a document object

See Also

docx

Examples

## Not run: 
doc.filename <- "addDocument_example.docx"
# set default font size to 10
options( "ReporteRs-fontsize" = 10 )

doc2embed <- docx( )
img.file <- file.path( Sys.getenv("R_HOME"),
                      "doc", "html", "logo.jpg" )
if( file.exists(img.file) && requireNamespace("jpeg", quietly = TRUE) ){
  dims <- attr( jpeg::readJPEG(img.file), "dim" )

  doc2embed <- addImage(doc2embed, img.file,
                       width = dims[2]/72, height = dims[1]/72)
  writeDoc( doc2embed, file = "external_file.docx" )

  doc <- docx( )
  doc <- addDocument( doc, filename = "external_file.docx" )
  writeDoc( doc, file = doc.filename )
}

## End(Not run)

Results