'PercTable {DescTools} - prevent output text wrapping

My goal is to export PercTable output in a clean / HTML like format as JPG or CSV import into a presentation.

I get the "raw" table I want with this code:

    Library(DescTable)
    PercTable(syn_gender ~ recommend, data=dfXtab, rfrq="010", expected=TRUE)

It outputs as shown in graphic. Screen snapshot for space saving

How can I export this output without the table wrapping the last 2 column?

Thank you - newbie.

export-to-csv desctools

Solution 1:^[1]

The PercTable print routine uses the console width (getOption("width")) to define the table breaks. So the first solution is to simply enlarge the console width and print again.

Another option for output if you're on Windows is to use the Office export (package RDCOMClient needed):

library(DescTools)
tt <- PercTable(table(d.pizza$operator, 
                      cut(d.pizza$temperature, breaks=6)))

wrd <- GetNewWrd()
ToWrd(tt$ftab)

would yield:

Sources

This article follows the attribution requirements of Stack Overflow and is licensed under CC BY-SA 3.0.

Source: Stack Overflow

Solution	Source
Solution 1	Andri Signorell

'PercTable {DescTools} - prevent output text wrapping

Solution 1:[1]

Sources

Related Questions

Solution 1:^[1]