Here is how you can make a table in GFM format using knitr + ascii
render_gfm()
gfm_table <- function(x, ...) {
require(ascii)
y <- capture.output(print(ascii(x, ...), type = "org"))
# substitute + with | for table markup| library(sqldf) | |
| library(doBy) | |
| library(plyr) | |
| library(data.table) | |
| n<-100000 | |
| grp1<-sample(1:750, n, replace=T) | |
| grp2<-sample(1:750, n, replace=T) | |
| d<-data.frame(x=rnorm(n), y=rnorm(n), grp1=grp1, grp2=grp2, n, | |
| replace=T) |
Here is how you can make a table in GFM format using knitr + ascii
render_gfm()
gfm_table <- function(x, ...) {
require(ascii)
y <- capture.output(print(ascii(x, ...), type = "org"))
# substitute + with | for table markup| .Rproj.user | |
| .Rhistory | |
| .RData | |
| *.Rproj | |
| *.html |