## ----eval = FALSE-------------------------------------------------------------
# dftoHTML(data,
#          out=NA,
#          file=NA,
#          note=NA,
#          anchor=NA,
#          col.width=NA,
#          col.align=NA,
#          row.names=FALSE,
#          no.escape=NA)

## ----eval = FALSE-------------------------------------------------------------
# library(vtable)
# 
# data(LifeCycleSavings)
# dftoHTML(LifeCycleSavings)

## ----eval=FALSE---------------------------------------------------------------
# library(vtable)
# 
# data(LifeCycleSavings)
# dftoHTML(LifeCycleSavings)
# dftoHTML(LifeCycleSavings,out='browser')
# dftoHTML(LifeCycleSavings,out='viewer')
# htmlcode <- dftoHTML(LifeCycleSavings,out='htmlreturn')

## ----eval=FALSE---------------------------------------------------------------
# data(LifeCycleSavings)
# dftoHTML(LifeCycleSavings,file='lifecycledata_htmlversion.html')

## ----eval = FALSE-------------------------------------------------------------
# dftoHTML(LifeCycleSavings,note='Data from Belsley, Kuh, and Welsch 1980').

## ----eval = FALSE-------------------------------------------------------------
# #Let's make sr much bigger for some reason
# dftoHTML(LifeCycleSavings,col.width=c(60,10,10,10,10))

## ----eval=FALSE---------------------------------------------------------------
# dftoHTML(LifeCycleSavings,row.names=TRUE)

## ----eval=FALSE---------------------------------------------------------------
# #Don't escape columns 1 or 2
# dftoHTML(LifeCycleSavings,no.escape=1:2)

## ----eval = FALSE-------------------------------------------------------------
# dftoLaTeX(data,
#          file=NA,
#          frag=TRUE,
#          title=NA,
#          note=NA,
#          anchor=NA,
#          align=NA,
#          row.names=FALSE,
#          no.escape=NA)

## ----eval = FALSE-------------------------------------------------------------
# library(vtable)
# 
# data(LifeCycleSavings)
# dftoLaTeX(LifeCycleSavings)

## ----eval=FALSE---------------------------------------------------------------
# data(LifeCycleSavings)
# dftoLaTeX(LifeCycleSavings,file='lifecycledata_latexversion.tex')

## ----eval = FALSE-------------------------------------------------------------
# dftoLaTeX(LifeCycleSavings,note='Data from Belsley, Kuh, and Welsch 1980').

## ----eval = FALSE-------------------------------------------------------------
# dftoLaTeX(LifeCycleSavings,anchor='tab:LCS')

## ----eval = FALSE-------------------------------------------------------------
# dftoLaTeX(LifeCycleSavings,row.names=TRUE,align='p{.25\\textwidth}ccccc')

## ----eval=FALSE---------------------------------------------------------------
# dftoLaTeX(LifeCycleSavings,row.names=TRUE)

## ----eval=FALSE---------------------------------------------------------------
# #Don't escape columns 1 or 2
# dftoLaTeX(LifeCycleSavings,no.escape=1:2)