0

ラベルを設定したいと思います。それは常に「n」（観測数の場合）である必要がありますが、各プロット要素の正しいインデックスと値が必要です。

たとえば、次の簡単な例では:

plot(1:4)
value<-c(10,20)
index<-c("a","b")
axis(3,at=c(2,3),labels=n?)

最初の n がインデックス "a" と値 10 を持ち、2 番目のインデックスが "b" と値 20 を持つようにするにはどうすればよいですか?

編集：

axis(3,at=c(2,3),
       labels=c(eval(substitute(expression(n==value), 
                                list(value=value[‌​1]))),
                eval(substitute(expression(n==value),
                                list(value=value[2])))))
4

1 に答える 1

2

あなたが何をしたいのかは完全には明らかではありません。しかし、ほとんどの場合、これを行うには ?expression と ?substitute を使用する必要があります。これで始められるはずです：

plot(1:4)
value<-c(10,20)
index<-c("a","b")

lab <- rep(expression(paste("n"[index], "=", value, sep="")),2)

for (i in 1:length(lab)) {
  lab[i] <- eval(substitute(substitute(expr, list(value=value[i], index=index[i])), list(expr= as.call(lab[i]))))
}

axis(3,at=c(2,3),labels=lab)
于 2013-07-04T08:43:16.930 に答える