forループのacfとpacfダイアグラムのタイトルとサイズを変更するには

Question

次のコードを使用して、rのデータフレームの列ベクトルの10 acfとpacfデータをプロットしようとしています。私が変更された場合は

for (i in 1:10) 
{ 
    acf(data1[,i], 108, xlim=c(4,97), ylim=c(-.4,1), main=("The Country is", i)) 
    pacf(data1[,i],108, xlim=c(4,97), ylim=c(-.4,1)) 
} 

しかし、これは動作していない、私は

Error in parse(text = x, srcfile = src): <text>:5:74: unexpected ',' 
4: { 
5: acf(data1[,i], 108, xlim=c(4,97), ylim=c(-.4,1), main=("The Country is", 
                      ^
Traceback: 

を取得しています。また、私がメインで、それは動作しますが、私は次元を好きではありません。私もそれを変更してもいいですか？

は、あなたが私はいくつかのマイナーな調整を行った私をたくさん助け、あなた

Answer 1

はありがとうZheyuan李をありがとうございます。

for (i in 1:10) 
{ 
    par(mfrow = c(1, 2)) 
    #acf(data1[,i], ylim=c(-0.2, 1), main = paste("The Country is", r[i+1])) 
    acf(data1[,i], ylim=c(-0.2, 1),main =NA) 
    pacf(data1[,i], ylim=c(-0.2, 1),main =NA) 
    par(mfrow = c(1, 1)) 
    title(r[i+1], outer=TRUE) 
} 

これは、仕事をするだろう