2013-02-07 2 views
2

최근 R에서 문제를 겪었습니다. 그 조합에서 인터넷에서 해결하려고했지만 검색 한 적이 있지만 아직 해결할 수 없었습니다. 누군가가 나를 도울 수 있기를 바랍니다.pdf 글꼴 및 그래프 서식 지정 (win.graph)

Windows 7에서 R (x64)을 실행합니다. 그래픽 장치 자체는 자동으로 Arial을 글꼴로 사용하며 그래프를 비트 맵으로 저장하면 "글꼴"은 그대로 유지됩니다. 그러나, 나는 그래프를 PDF로 저장하는 것을 선호합니다.이 경우 GUI 저장 버튼을 통해 단순히 저장하면 결과 pdf의 글꼴이 Helvetica로 바뀝니다.

Arial afm-Files 및 pdf ("Test_Auto.pdf", family = "Arial")를 사용하여 인터넷에서의 해결책을 찾았습니다. 결과적으로 Arial을 글꼴로 사용하는 pdf가되었습니다 --- 지금까지 너무 좋아.

이제 그래프 레이아웃을 win.graph를 사용하여 변경해야합니다. 문제가 시작되는 곳입니다. 다음은 예입니다

Arial <- Type1Font(family = "Arial", metrics = c("C:/R_Fonts/ArialPlain.afm", "C:/R_Fonts/ArialBold.afm", "C:/R_Fonts/ArialItalic.afm", "C:/R_Fonts/ArialBoldItalic.afm")) 
pdfFonts(Arial = Arial) 

setwd("C:/PDFCrop") 
D1<-matrix(c(1,2,3,4,6,3),3,2) 
D2<-matrix(c(1,2,3,5,3,1),3,2) 

#pdf("Test_Auto.pdf", family = "Arial") 
win.graph(8.3,12,12) 
layout(matrix(c(1,2),1,2,byrow=TRUE)) 
plot(D1,type="l",main="Gobble R") 
plot(D2,type="l",main="Gobble R") 
#dev.off() 

지금이기 때문에이 코드는 내가 그것을보고 싶어처럼 보이는 그래프를 만들 작동하지만 내가 (파일 -> 다른 이름으로 저장) 수동으로 그래프를 저장해야하고 I pdf에서 Helvetica를 글꼴로 사용하십시오.

대안 I는

pdf("Test_Auto.pdf", family = "Arial") 
#win.graph(8.3,12,12) 
layout(matrix(c(1,2),1,2,byrow=TRUE)) 
plot(D1,type="l",main="Gobble R") 
plot(D2,type="l",main="Gobble R") 
dev.off() 

하부 부분을 변경할 수 있으며, 즉 실제로 굴림를 이용하여 PDF 파일을 생성하지만, I는 의도 된 바와 같이, 그래프는 다른 크기를 갖는다. 모두 함께 사용할 때 "크기가 0KB가 아니지만"페이지가 포함되어 있지 않기 때문에 "열 수없는"pdf 파일을 얻을 수 있습니다.

이 방법을 사용할 수 있습니까, 아니면 pdf()와 dev.off() 사이에서 사용할 수있는 win.graph 대신 사용할 수 있습니까?

도움 주셔서 감사합니다.

+0

PDF로 장치의 크기를 설정, 힌트 주셔서 감사합니다. 두 개의 다른 장치를 섞으려고하는 것은 광기에 대한 처방입니다. –

답변

0

오 마이 갓, 미안 해요, 너무 바보 같았어요!

내가 간과하고있는 모든 과정에서 pdf 장치에는 자체 크기 매개 변수가 있습니다.

Arial <- Type1Font(family = "Arial", metrics = c("C:/R_Fonts/ArialPlain.afm", "C:/R_Fonts/ArialBold.afm", "C:/R_Fonts/ArialItalic.afm", "C:/R_Fonts/ArialBoldItalic.afm")) 
pdfFonts(Arial = Arial) 

setwd("C:/PDFCrop") 
D1<-matrix(c(1,2,3,4,6,3),3,2) 
D2<-matrix(c(1,2,3,5,3,1),3,2) 

pdf("Test_Auto.pdf", width=8.3, height=12, family = "Arial") 
#win.graph(8.3,12,12) 
layout(matrix(c(1,2),1,2,byrow=TRUE)) 
plot(D1,type="l",main="Gobble R") 
plot(D2,type="l",main="Gobble R") 
dev.off() 

는 DWIN

관련 문제