Alguém saberia como inserir o valor de um objeto numérico dentro de uma expressão?

Eu queria fazer um gráfico assim:

hist(rnorm(n=100,mean=67,sd=37),main=expression("Media = 67"%+-%37))

mas se eu faço:
media<-67
dp<-37

hist(rnorm(n=100,mean=67,sd=37),main=expression("Media ="media%+-%dp))

hist(rnorm(n=100,mean=67,sd=37),main=paste("Media =", media ,expression(""%+-%""),dp))

Não dá certo. Alguém saberia como resolver?

Desde já mais uma vez agradeço,

Daniel