sem 패키지의 knitr 및 specifyModel()

Question

패키지의 specifyModel()으로 지정된 모델로 .rnw 파일을 컴파일하려고하면 오류가 계속 발생합니다. knitr은 쉼표가 F1 -> X1, lam1, NA에 싫어합니다.

#Quitting from lines 5-27 (test.rnw) 
#Error in parse(text = x, srcfile = src) : <text>:5:16: unexpected ',' 
#5:  model.mydata <- specifyModel() 
#6:  F1 -> X1, 

어떤 생각 : 여기

\documentclass{article} 

\begin{document} 

<<specify, include=FALSE, tidy=FALSE>>= 
# Simple CFA Model 
    # from: http://www.statmethods.net/advstats/factor.html 
    library(sem) 
    model.mydata <- specifyModel() 
     F1 -> X1, lam1, NA 
     F1 -> X2, lam2, NA 
     F1 -> X3, lam3, NA 
     F2 -> X4, lam4, NA 
     F2 -> X5, lam5, NA 
     F2 -> X6, lam6, NA 
     X1 <-> X1, e1, NA 
     X2 <-> X2, e2, NA 
     X3 <-> X3, e3, NA 
     X4 <-> X4, e4, NA 
     X5 <-> X5, e5, NA 
     X6 <-> X6, e6, NA 
     F1 <-> F1, NA, 1 
     F2 <-> F2, NA, 1 
     F1 <-> F2, F1F2, NA 

    model.mydata 
# end 
@ 

\end{document} 

오류입니다 : 여기

오류를 재현하는 예는?

Answer 1

specifyModel에 파일을 지정하지 않으면 표준 입력 스트림 (stdin)에서 읽으려고 시도합니다. 내에서 가능할 수도 있지만,이 모델 사양을 읽는 것이 더 쉬울 것이라고 생각합니다. 파일. 예를

model <- readLines(con = textConnection('F1 -> X1, lam1, NA 
F1 -> X2, lam2, NA 
F1 -> X3, lam3, NA 
F2 -> X4, lam4, NA 
F2 -> X5, lam5, NA 
F2 -> X6, lam6, NA 
X1 <-> X1, e1, NA 
X2 <-> X2, e2, NA 
X3 <-> X3, e3, NA 
X4 <-> X4, e4, NA 
X5 <-> X5, e5, NA 
X6 <-> X6, e6, NA 
F1 <-> F1, NA, 1 
F2 <-> F2, NA, 1 
F1 <-> F2, F1F2, NA')) 
cat(model, file = 'model.spec', sep = '\n') 
model.mydata <- specifyModel(file = 'model.spec') 

를 들어

은 또는 당신은 단순히 model.spec 파일을 생성하고 그것을 읽을 수 있습니다.