ggplot2: Почему Semi-Transparency + pdflatex вызывают более тяжелые PDF-шрифты?
У меня возникла проблема, когда pdf()
ing в R, а затем pdflatex
-в изображение ggplot2 заставляет весь текст на той же странице, что и изображение, чтобы он стал смелым, но только когда alpha
< 1. Здесь минимальный пример в R:
require("ggplot2")
"%_%" <- function(a, b) paste(a, b, sep="")
test <- function(filename, alpha)
{
pdf(filename %_% "-fig.pdf")
p <- ggplot(mtcars, aes(wt, mpg)) + geom_point(alpha=alpha)
print(p); dev.off()
latexDocument <- c(
"\\documentclass{article}",
"\\usepackage{Sweave}",
"%\\pdfpageattr{/Group <</S /Transparency /I true /CS /DeviceRGB>>}",
"\\begin{document}",
"Lorem ipsum dolor sit amet, consectetur adipiscing elit.",
"\\begin{figure}",
"\\includegraphics{" %_% filename %_% "-fig}",
" \\caption{Figure Caption}",
"\\end{figure}",
"\\end{document}")
con <- file(filename %_% ".tex"); writeLines(latexDocument, con); close(con)
system("pdflatex " %_% filename)
}
test("test1", 1)
test("test2", 0.3)
Сравнивая выходные файлы test1.pdf и test2.pdf, я замечаю, что последний документ имеет более тяжелые шрифты при просмотре в Acrobat или Acrobat Reader. Ранее обсуждалась проблема здесь, но без разрешения.
Кажется, я не могу решить проблему, которая искажает внешний вид отчетов, которые я создаю с помощью Sweave. Кто-нибудь может понять это? Я использую R версии 2.13.1 для Windows.