am = c( "automatic", "manual" )[mtcars$am+1]
carb = paste( mtcars$carb, "carburetor(s)")
my_freq_table = freqtable(table( am, carb ) )
print( my_freq_table )
if( interactive() ) readline("Hit <Return> to see next FlexTable:")
my_freq_table = freqtable(table( am, carb, useNA = "always") )
print( my_freq_table )
if( interactive() ) readline("Hit <Return> to see next FlexTable:")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.