r - その場でレイアウト用のタイトルを作成します

Question

次のように、レイアウト内の各フィールドにタイトルを付ける簡単な方法を探しています。

layout(matrix(1:8, nrow=2, ncol=4, byrow=TRUE)) # Graph matrix

for (x in names(ftime.p)){
  plot(listz$x$data)
  title(x)
}

私の場合、 length(listz) = 8 であることに注意してください

代わりに sapply を使用することを考えましたが、問題は title() 関数をそれに適合させることです:

sapply(listz, function(x) plot(x$data))

score 1 · Accepted Answer

main次のようなプロットの引数を使用できます

sapply(listz, function(x)  plot(x$data, main=x))

score 1 · Accepted Answer

再現可能な例を次に示します。

layout(matrix(1:8, nrow=2, ncol=4, byrow=TRUE)) # Graph matrix
sapply(names(mtcars[1:8]), FUN=function(X) plot(mtcars[[X]], main=X))

2 に答える 2