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 |