2012-11-17 11 views
7

के अंदर रहना यहां मेरा MWE कोड है।आर खंड कोड बीमर फ्रेम

\documentclass{beamer} 
\begin{document} 

<<setup, include=FALSE>>= 
# smaller font size for chunks 
opts_chunk$set(size = 'footnotesize') 
options(width=60) 
@ 


\begin{frame}[fragile] 
\frametitle{Test1} 

<<boring-random>>= 
y <- c(5, 7, 15, 17, 17, 19) 
Trt <- gl(n = 3, k = 2, length = 3 * 2, labels = paste("Trt", 
1:3, sep = ""), ordered = FALSE) 
Data <- data.frame(Trt, y) 
Fit1 <- aov(formula = y ~ Trt, data = Data, contrasts = list(Trt = "contr.sum")) 
ANOVA1 <- anova(Fit1) 
Coeffs1 <- coefficients(Fit1) 
@ 
\end{frame} 

\end{document} 

enter image description here

मैं बीमर सीमा के भीतर आर हिस्सा कोड रखने के लिए संघर्ष कर रहा हूँ। मुझे आश्चर्य है कि आर खंड कोडों को प्रबंधित करने का एक प्रभावी तरीका क्या है कि वे बीमर फ्रेम के अंदर रहते हैं। धन्यवाद

+1

प्रारूप आर पैकेज से 'tidy.source' जैसे कुछ का उपयोग करना एक विकल्प होगा? – Dason

+0

'knitr' डिफ़ॉल्ट रूप से' tidy.source' का उपयोग करता है, और चौड़ाई 'getOption (' width ') ' –

उत्तर

5

सबसे अच्छा तरीका tidy विकल्प tidy=FALSE से बंद करना है, और मैन्युअल रूप से अपनी लाइनें तोड़ना है।

<<boring-random, tidy=FALSE>>= 
y <- c(5, 7, 15, 17, 17, 19) 
Trt <- gl(n = 3, k = 2, length = 3 * 2, labels = paste("Trt", 
    1:3, sep = ""), ordered = FALSE) 
Data <- data.frame(Trt, y) 
Fit1 <- aov(formula = y ~ Trt, data = Data, 
    contrasts = list(Trt = "contr.sum")) 
ANOVA1 <- anova(Fit1) 
Coeffs1 <- coefficients(Fit1) 
@ 

यह हमेशा काम करेगा। दूसरा तरीका को options() (knitr FAQ 8) में सेट करना है, और आपको शायद आदर्श width के लिए कुछ बार प्रयास करने की आवश्यकता है। आपके मामले में, 60 स्पष्ट रूप से बहुत बड़ा है।

+2

द्वारा निर्धारित की जाती है, यह टेक्स्ट मार्जिन को थोड़ा कम करने में भी मदद कर सकती है, उदा। \ prebeamersize {text margin left = 16pt, टेक्स्ट मार्जिन दाएं = 16pt} 'को अपने प्रस्ताव में रखें, जैसा कि [इस उत्तर में] (http://tex.stackexchange.com/a/204205/21118)। –