新しい文字列varにペーストしますが、Lavaanの新しい行で折りたたまれます

Question

私は大きなSEMを持っていますが、Lavaanパッケージを使用しています。 それは大きいので、ループを使って方程式を生成します。しかし、方程式を文字列として入力する必要があります。各方程式は新しい行です。例えば：

単にエラーのスペース結果によって分離

model <- ' 
    F1_all =~ target 
    F2_all =~ target 
    F3_all =~ target 
' 

：

私の問題は私のことができるようにする必要があるということです：「オブジェクト 『targetF3_all』が見つかりません〜targetF3_all =〜ターゲットでエラー」 貼り付けと折り返しによる折り返しで文字列を作成するので、cat（）はオプションではありません。

アイデア？

Answer 1

あなたはpasteでcollapse=引数を使用することができます。

model = paste(c('F1_all =~ target', 'F2_all =~ target', 'F3_all =~ target'), 
       collapse = '\n') 
# [1] "F1_all =~ target\nF2_all =~ target\nF3_all =~ target"