getStyleText(styleName, rtfStyleDataFrameIn=rtfStyleDataFrame)
This function closes a section in the file and may mark the next section as protected.
TIBCO Software Inc.
rtfStyleDataFrame <- data.frame( name=c("Table Header"), styleNumTxt=c("\\s25"), styleBasedOn=c(16), snextNum=c(35), styleText=c( "\\ql \\fi-1701\\li1701\\ri0\\sb113\\sa57\\sl280\\slmult0\\keepn\\widctlpar\\aspalpha\\aspnum\\faauto\\outlinelevel4\\adjustright\\rin0\\lin1701\\itap0 \\b\\f1\\fs24\\lang1033\\langfe1041\\cgrid\\langnp1033\\langfenp1041", ), stringsAsFactors=F) TABLEHEADERSTYLE <- getStyleText("Table Header")