On 2010-7-1 15:24, Jinsong Zhao wrote:
Read the source again more carefully. I think I get the solution:
Change the following line in PDFfontNumber function in devPS.c:
num = 1000 + (cidfontIndex - 1)*5 + 1 + face;
to
num = 1000 + (cidfontIndex - 1)*5 + face;
It appears two times in the function.
However, I don't know how to compile the whole R distribution on Windows
platform. Would anyone here like to give a test? Thanks in advance!
Regards,
Jinsong
I have compiled R 2.11.1 on a Linux machine, and confirmed that
PDFfontNumber function in devPS.c (grDevices library) has a bug, which
causes the plain face of CID fonts cannot be accessed when CID fonts
were used together with default font family in pdf().
the following is the patch.
--- devPS_orig.c Sun Apr 25 06:10:04 2010
+++ devPS.c Fri Jul 02 09:46:55 2010
@@ -7267,7 +7267,7 @@
* Use very high font number for CID fonts to avoid
* Type 1 fonts
*/
- num = 1000 + (cidfontIndex - 1)*5 + 1 + face;
+ num = 1000 + (cidfontIndex - 1)*5 + face;
else {
/*
* Check whether the font is loaded and, if not,
@@ -7303,7 +7303,7 @@
} else /* (isCIDFont(family, PDFFonts)) */ {
if (addPDFDeviceCIDfont(cidfontfamily, pd,
&cidfontIndex)) {
- num = 1000 + (cidfontIndex - 1)*5 + 1 + face;
+ num = 1000 + (cidfontIndex - 1)*5 + face;
} else {
cidfontfamily = NULL;
Regards,
Jinsong
--
Jinsong Zhao, Ph.D.
College of Resources and Environment
Huazhong Agricultural University
Wuhan 430070, P.R. China
E-mail: jsz...@mail.hzau.edu.cn
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
