You can replace expression
with substitute
. There's no need for the paste
. The argument list(t0 = t0)
tells substitute
to replace the string t0
with the value of the object t0
:
plot(1,1)
t0 <- 1.3
text(1, 0.8, substitute(t[0]==t0, list(t0 = t0)), cex = 0.8)