[R] special language character in a pie chart

[Prof Brian Ripley]

Please see the posting guide, and supply the information you were 
asked for (and read the relevant manuals).

What OS?
What locale?
What graphics device?

No extra support is needed: R handles Czech characters perfectly well 
in a Czech locale (or any UTF-8 locale provided you have the correct 
fonts, including en_GB.UTF-8 on my system).

My guess is that you are on Windows: if so this is covered in the 
rw-FAQ (see the posting guide).

On Mon, 17 Oct 2011, milena wrote:

> Dear List Members,
>
> I am working on a below piece of code: Initially have created pie
> charts with Enlish labels to present the data for Czech Republic, now
> however I need to print the label with original Czech fonts.
>
> When I copy paste from Word, certain fonts get 'simplified' distorting
> original spelling. How can solve this problem?

Don't use Word ....

> Is there a package I
> can download which will support special language characters?
>
> This example is in Czech, however should i replicate it into other
> languages with specific signs, is there any universal way to do that?
>
> many thnx to everyone for help,
>
> m.
>
>
>
> cz09<-c(3539.2,91.7,782.5,1028.2,1594.3,1368.9,2062.2,58.2,3402.5,3679.3,1638.5,
> 4139.3,4375.9,1264)
>
>
> names(cz09)<-c('Food products',
> 	'Leather and leather products',
> 	'Textiles and textile products',
> 	'Wood and wood products',
> 	'Paper products; publishing and printing',
> 	'Chemicals, chemical products',
> 	'Rubber and plastic products',
> 	'Refined petroleum products',
> 	'Machinery and equipment n.e.c.',
> 	'Electrical and optical equipment',
> 	'Other non-metallic mineral products',
> 	'Basic metals and fabricated metal products',
> 	'Transport equipment','Manufacturing n.e.c.')
>
> colors=c('yellow','chocolate4','deeppink','green','darkgreen',
> 	    'orange','cyan','lightgoldenrod1','blue','red','blueviolet',
> 	    'honeydew3','deeppink4','sandybrown')
>
> win.graph(width = 7, height = 4)
> par(mar=c(0,2.5,0,0))
> par(bg='white')
> par(mfrow=c(1,1))
>
> pie(cz09,col=colors, border=NA, radius=0.75,
> cex=0.75, font=1, font.main=1, cex.main=1.25)
>
>
>
>
>
>
> ### czech in czech
> cz09<-c(3539.2,91.7,782.5,1028.2,1594.3,1368.9,2062.2,58.2,3402.5,3679.3,1638.5,
> 	4139.3,4375.9,1264)
>
> names(cz09)<-c('Výroba potravinářských výrobků',
> 	'Výroba usní a výrobků z usně',
> 	'Výroba textilií, textilních a oděvních výrobků',
> 	'Zpracování dřeva a výroba dřevěných výrobků kromě nábytku',
> 	'Výroba výrobků z papíru; vydavatelství a tisk',
> 	'Výroba chemických látek, přípravků, výrobků a chemických vláken',
> 	'Výroba pryžových a plastových výrobků',
> 	'Rafinérské zpracování ropy',
> 	'Výroba strojů a zařízení j.n.',
> 	'Výroba elektrických a optických přístrojů a zařízení',
> 	'Výroba ostatních nekovových minerálních výrobků',
> 	'Výroba základních kovů, hutních a kovodělných výrobků',
> 	'Výroba dopravních prostředků a zařízení','Zpracovatelský průmysl j.n.')
>
> colors=c('yellow','chocolate4','deeppink','green','darkgreen',
> 	    'orange','cyan','lightgoldenrod1','blue','red','blueviolet',
> 	    'honeydew3','deeppink4','sandybrown')
>
> win.graph(width = 7, height = 4)
> par(mar=c(0,10,0,8))
> par(bg='white')
> par(mfrow=c(1,1))
>
> pie(cz09,col=colors, border=NA, radius=0.75,
> cex=0.75, font=1, font.main=1, cex.main=1.25)
>

-- 
Brian D. Ripley,                  ripley at stats.ox.ac.uk
Professor of Applied Statistics,  http://www.stats.ox.ac.uk/~ripley/
University of Oxford,             Tel:  +44 1865 272861 (self)
1 South Parks Road,                     +44 1865 272866 (PA)
Oxford OX1 3TG, UK                Fax:  +44 1865 272595