스웨이드 용 R 청크의 중첩 루프

Question

Sweave/knitr 문서에 입력 할 짧은 코드 청크를 작성하려고합니다. 내 코드

<<echo = TRUE>>= 
while (sqrt(x^2 + y^2) > 1) { 
     sprintf("Y = %f", y) 
     x = runif(1,min,max) 
     y = runif(1,min,max) 
} 
sprintf("X = %f", x) 
@ 

두 개의 루프는 독립적으로 작동하지만 위와 같이 중첩 된 경우에는 작동하지 않습니다. 콘솔에서 코드를 붙여 넣는 문제 해결을 시도했습니다. 교수님은 모든 작업을 하나의 라텍스 문서로 통합해야합니다. 어떤 도움이라도 대단히 감사합니다.

Answer 1

이것은 스웨터가 아니라 코드에 문제가 없습니다.

1. 루프를 입력하기 전에 x 및 y 값을 설정하지 않습니다.
2. 기본값 (0 및 1)을 사용하려면 최소 및 최대 값을 제공하지 않고 인수를 전혀 사용하지 마십시오.

이 코드는 효과가 있습니까?

\documentclass{article} 
\usepackage[english]{babel} 
\begin{document} 
<<echo = TRUE>>= 
x=10 
y=10 
while (sqrt(x^2 + y^2) > 1) { 
     sprintf("Y = %f", y) 
     x = runif(1,min=0,max=1) 
     y = runif(1,min=0,max=1) 
} 
sprintf("X = %f", x) 
@ 
\end{document}