1

Rでヒストグラムプロットのタイトルを組み立てようとしています。必要なタイトルは、2つのソースから派生しています。最初は、死因を指定するベクトル(death.cause)で、2番目はデータのフィールドです。フィールドに到達するために、リスト、deathratecolsを使用してインデックスを作成するフレーム。

> death.cause 

> [[1]] [1] "Heart Attack"
> 
> [[2]] [1] "Heart Failure"
> 
> [[3]] [1] "Pneumonia"


> deathratecols

> [1] 11 17 23

次のようなタイトルを組み立てたいと思います:Heart Attack(x-bar = 7.63763)、ここでx-barはデータ列の平均です。以下のように、2つの部分を別々に動作させることができます。

> main=substitute(x, list(x=death.cause[[i]]) )) # gives title "Heart Attack" 

> main=substitute(bar(X)==k, list(k=mean(outcome[, deathratecols[i] ], na.rm=TRUE   ) )) # gives title x-bar=7.63763

しかし、paste()を使用して2つを組み合わせるという私の努力は失敗しました。

?誰かが私のやり方の誤りを指摘してください

4

2 に答える 2

2

ステートメントを使用して事前にタイトルをフォーマットし、sprintfに渡しmainます。些細な例:

a <- "foo"
b <- "bar"
title <- sprintf("This combines %s and %s", a, b)
hist(rnorm(10), main = title)

おそらく次のようなものです(ただし、使用する例を提供していないため、機能しない可能性があります):

title <- sprintf("%s, (x-bar = %s)", death.cause[[i]], mean(outcome[, deathratecols[i]])
于 2012-10-11T20:06:00.753 に答える