[R-br] Expressão em Itálico no Gráfico

[Felipe]

Prezados,

Estou plotando o gráfico, segundo os comandos abaixo, e desejo que no 
título do gráfico as expressões 1/x e 1/x^2 apareçam em itálico, assim 
como no corpo do gráfico usando text().

x <- seq(0, 10,length = 1000)
y <- 1/x
matplot(x, y,  axes=F, type="n", xlim=c(1, 7), ylim=c(0, 1), xlab="x", 
ylab="f (x)",cex.main=0.85,font.main=1,font.axis=1,
         cex.lab=0.75, font.lab=1, mgp=c(2,1,0), 
main=expression(Gráfico~das~funções:~1/x~~e~~1/x^2))

# Traçando o gráfico da função: 1/x
x  <- x[x >= 1  &  x <= 7]
fx <- 1/x
matplot(x, fx, type = "l", lty=1, add=T)
#  Adicionando texto no corpo do gráfico da função f(x0 = 1/x
text(5, 0.26, expression(1/x), cex=0.7)

# Traçando o gráfico das funções: 1/x e  1/x^2
gx = 1/x^2
matplot(x, gx, type = "l", lty=2, add=T)
#  Adicionando texto no corpo do gráfico: funções
text(3.5, 0.16, expression(1/x^2), cex=0.7)
# Plotando o beta
abline(v = 6, lty = 3)

# Definindo os eixos
axis(1, at=seq(1,7,1), cex.axis=0.7, labels = expression(1,2,3,4,5,beta,""))
axis(2, at=seq(0,1,0.5), cex.axis=0.7)
abline (v=0, h=0)
abline (v=1, lty = 2)

Alguém sabe como fazer?
Desde já agradeço a ajuda.