# NOT RUN {
data( data_ReporteRs )
myFlexTable = FlexTable( data = data_ReporteRs
	, span.columns = "col1"
	, header.columns = TRUE
	, row.names = FALSE )
myFlexTable = addFlexCellContent( myFlexTable
	, i = 1:4, j = 1
	, value = c("A", "B", "C", "D")
	, textProperties = textProperties( color="red" )
	)
myFlexTable = addFlexCellContent( myFlexTable
	, i = 1:4, j = 2
	, value = c("E", "F", "G", "H")
	, textProperties = textProperties( color="red" )
	, newpar = TRUE
	)
# }
Run the code above in your browser using DataLab