आर मार्कडाउन में इनलाइन आर कोड को हाइलाइट करने के लिए कैसे करें?

Question

यह प्रश्न consistent code html inline and in chunks with knitr के समान है। आरएचटीएमएल दस्तावेजों के बजाय, मैं आर मार्कडाउन दस्तावेजों में इनलाइन आर कोड को हाइलाइट करना चाहता हूं, उदाहरण के लिए, `r "plot(cars, main = 'A scatterplot.')"`रैमार्कडाउन के माध्यम से संकलित किया गया है, plot जैसे टोकन को हाइलाइट किया जाना चाहिए। डिफ़ॉल्ट रूप से, आर कोड भाग सिंटैक्स हाइलाइट किए जाते हैं, लेकिन इनलाइन आर कोड को हाइलाइट करने का कोई तरीका नहीं है।

Answer 1

यहाँ highr पैकेज (devtools::install_github('yihui/highr')) की development version का उपयोग कर एक समाधान है। मूल रूप से आप टोकन को हाइलाइट करने के लिए बस अपने कस्टम लाटेक्स कमांड को परिभाषित करते हैं। highr:::cmd_pandoc_latex लाटेक्स कमांड का डेटा फ्रेम है जो पांडोक सिंटैक्स हाइलाइटिंग करने के लिए उपयोग करता है।

head(highr:::cmd_pandoc_latex) 
##     cmd1 cmd2 
## COMMENT \\CommentTok{ } 
## FUNCTION \\NormalTok{ } 
## IF  \\NormalTok{ } 
## ELSE  \\NormalTok{ } 
## WHILE  \\NormalTok{ } 
## FOR  \\NormalTok{ } 

तो फिर तुम knitr की inline हुक को फिर से परिभाषित कर सकते हैं:

--- 
output: 
    pdf_document: 
    keep_tex: yes 
--- 

```{r include=FALSE} 
local({ 
    hi_pandoc = function(code) { 
    if (knitr:::pandoc_to() != 'latex') return(code) 
    if (packageVersion('highr') < '0.6.1') stop('highr >= 0.6.1 is required') 
    res = highr::hi_latex(code, markup = highr:::cmd_pandoc_latex) 
    sprintf('\\texttt{%s}', res) 
    } 
    hook_inline = knitr::knit_hooks$get('inline') 
    knitr::knit_hooks$set(inline = function(x) { 
    if (is.character(x) && inherits(x, 'AsIs')) hi_pandoc(x) else hook_inline(x) 
    }) 
}) 
``` 

Test inline R code: `r I("plot(cars, main = 'A scatterplot.')")`. 
Normal inline code `r pi`. 

A code block: 

```r 
plot(cars, main = 'A scatterplot.') 
1 + 2 # a comment 
``` 

मैं वाक्य रचना सामान्य चरित्र तार से प्रकाश डाला होने के लिए चरित्र तार बताने के लिए एक सुविधाजनक मार्कर के रूप में I() इस्तेमाल किया। यह सिर्फ एक मनमाना विकल्प है। पीडीएफ उत्पादन:

यह एक आदर्श समाधान है, हालांकि नहीं है। आपको कुछ मामलों में इसे ट्विक करने की आवश्यकता होगी। उदाहरण के लिए, अधिकांश विशेष लाटेक्स वर्ण बच नहीं पाएंगे, जैसे ~। आपको hi_pandoc() द्वारा gsub() द्वारा लाए गए लाटेक्स कोड को संसाधित करने की आवश्यकता हो सकती है।

व्यक्तिगत रूप से मुझे इनलाइन आउटपुट विचलन में कई रंग मिलते हैं, इसलिए मैं इसे हाइलाइट करना सिंटैक्स नहीं करता, लेकिन यह पूरी तरह से व्यक्तिगत स्वाद है।