1つの従属変数と1つの独立変数を使用して18分位点回帰を実行しています。$ \ tau = 0.01,0.02、...、0.99$にわたる18の勾配推定値の分布の$6 *3$タイルプロットが必要です。
これまでに私ができたことは次のとおりです。
require(quantreg)
op <- par(xlab="")
y=rnorm(200)
x=rnorm(200)
plot(summary(rq(y~x,tau=1:99/100)),parm=2,main="",mfrow=c(6,3),mar=c(0.5,2,2,2))
par(new=TRUE)
plot(summary(rq(y~x,tau=1:99/100)),parm=2,main="",mfrow=c(6,3),mar=c(0.5,2,2,2))
2番目のプロットは右下まで行きますが、3回目に試すと、グラフウィンドウにも表示されません。
par(mfrow = c(6,3))をplot()の外に配置しようとしましたが、機能しませんでした。