プロットポイントラベルのテキストに下付き文字を含める方法

Question

こんにちは私はRに新しいので、これは非常に基本的な質問である場合はお詫び申し上げます。 私はx軸上の点11のプロットにテキストを追加しようとしており、y軸上の点900を指しており、t0= -4.0280には0を添え字として表示します。 t0 <- -4.0280 はこれを行うには、どこで試してみた：

text(11,900,paste("t[0]=",t0),cex=0.8) 
# which gives 
't[0]= -4.0280' 

text(11,900,expression(paste("t[0]=",t0)),cex=0.8) 
# which gives 
't[0]=t0' 

# the closest I've gotten is:  
text(11,900,expression(paste(t[0]==t0)),cex=0.8) 

た添字を使用しますが、-4.0280の私の値の代わりにt0を返します。

誰でも私が間違って行った場所を教えてもらえますか？

乾杯。

Answer 1

expressionをsubstituteに置き換えることができます。 pasteの必要はありません。引数list(t0 = t0)がオブジェクトt0の値を文字列t0を交換するsubstituteを伝えます：substituteよりやや短い

plot(1,1) 

t0 <- 1.3 

text(1, 0.8, substitute(t[0]==t0, list(t0 = t0)), cex = 0.8) 

Answer 2

はbquoteである：

plot(1,1) 
t0 <- -4.0280 
text(1, 0.8, bquote("t"[0] ~ "=" ~ .(t0))) 

のあなたがしたい場合そこにpasteを使用するように：

は

text(1, 0.8, (bquote("t"[0]~.(paste0('=',t0))))) 

Qのこの種のは、以前にポップアップしています

Using subscript and variable values at the same time in Axis titles in R

Concatenate strings and expressions in a plot's title