O caractere utf8 no rótulo não aparece quando eu salvo o gráfico em formato pdf. Ele não aparece quando eu uso o botão "Exportar" no RStudio e não aparece quando eu incluo esse código em um documento Sweave com saída de gráficos em PDF. Meu problema é obter a saída de PDF correta com Sweave (não knitr). (Se não encontrar uma solução, gerarei comtikzDevice)

ylab <- expression(paste("", bar(italic("\u2113")), "(",phi[0], "|", italic(list(x,y)), ")"))
plot(0,0, ylab=ylab)