pdf(outfile, family="Japan1")
    plot(式)
    dev.off()

これでいかがでしょうか?
日本語が表示できるフォントを指定しないと文字化けを起こしてしまうはずですので、pdf() で日本語フォントを設定します。