Как нарисовать китайские иероглифы в pdf?

Мой вопрос связан с моим предыдущим вопросом.

Как построить гистограмму с китайскими именами на входе файл?

Мне нужно построить сейчас китайские иероглифы в формате pdf.

mydata = matrix( c( 2:6, c( 2,4,2,6,3 ) ), nrow= 2 )
mylabs = c( "木材", "表", "笔", "垃圾桶", "杯" )
barplot( mydata, beside=T, horiz= "T", names.arg= mylabs, las= 1, col= c( "red", "blue" ) )

pdf( "plotname.pdf" )
barplot( mydata, beside=T, horiz= "T", names.arg= mylabs, las= 1, col= c( "red", "blue" ) )
dev.off()

А вот на pdf только.... печатается вместо китайских имён.

С уважением


r pdf unicode plot
person Manish    schedule 18.10.2012    source источник

Ответы (2)


arrow_upward
3
arrow_downward

Попробуй это:

cairo_pdf( "plotname.pdf" )
barplot( mydata, beside=T, horiz= "T", names.arg= mylabs, las= 1, col= c( "red", "blue" ) )
dev.off()
person January    schedule 18.10.2012
comment
Хорошо, но я получаю следующее сообщение об ошибке в моем Linux, когда я использую команду cairo, не удалось загрузить cairo DLL - person Manish; 18.10.2012
comment
Уважаемый Маниш, что-то не так с вашей Ubuntu. Я также использую 10.04, интерфейс по умолчанию, и он работает как шарм. - person January; 18.10.2012

arrow_upward
2
arrow_downward

У меня была та же проблема, что и у вас (у меня Mac с R 2.14.2 и языковыми настройками на французском языке).
Мне удалось обойти это, указав семейство шрифтов "GB1" (упрощенный китайский) в вызове pdf :

pdf( "plotname.pdf" , family="GB1")
barplot( mydata, beside=T, horiz= "T", names.arg= mylabs, las= 1, col= c( "red", "blue" ) )
dev.off()
person plannapus    schedule 18.10.2012
comment
Это очень полезно, но чтобы увидеть китайские иероглифы, мне нужно установить китайский шрифт для Adobe Reader. - person Manish; 18.10.2012