search

atusy / blog

blog of atusy
https://blog.atusy.net
1 stars 0 forks source link

knitエンジン: text #43

Open atusy opened 5 years ago

atusy commented 5 years ago 
knitr::knit_engines$set(
  text = function(options) {
    options$results <- 'asis'
    options$echo <- FALSE
    knitr::engine_output(options, NULL, options$code)
  }
)
あいうえお
かきくけこ
atusy commented 5 years ago 
knitr::knit_engines$set(
  text = function(options) {
    options$results <- 'asis'
    print(options$code)
    options$echo <- FALSE
    knitr::engine_output(
      options, 
      NULL, 
      paste(options$code, collapse ="")
    )
  }
)
あいうえお
かきくけこ

あいうえおかきくけこ