#title R Graphics
["R"] Graphics
[[TableOfContents(3)]]
== ±×·¡ÇÈ µð¹ÙÀ̽º ==
R¿¡¼´Â ´ÙÀ½°ú °°Àº ±×·¡ÇÈ µð¹ÙÀ̽º¸¦ »ç¿ëÇÒ ¼ö ÀÖ´Ù.
* postscript
* pdf
* pictex
* xfig
* bitmap
* X11
* png
* jpeg
µû·Î ÁöÁ¤ÇÏÁö ¾Ê¾ÒÀ¸¸é ±âº»ÀûÀ¸·Î ȸé(X11)À¸·Î Ãâ·ÂµÈ´Ù. ¿¹¸¦ µé¾î,
´ÙÀ½Ã³·³ ¸í·ÉÀ» ³»¸®¸é »õ·Î¿î âÀÌ Çϳª ¶ß¸é¼ Á¤±ÔºÐÆ÷ ±×·¡ÇÁ°¡ ±×·ÁÁø´Ù.
{{{
> plot(dnorm, -3, 3)
}}}
ÆÄÀÏ·Î ÀúÀåÇÏ·Á¸é ±×·¡ÇÈ µð¹ÙÀ̽º¸¦ ÁöÁ¤ÇØ¾ß ÇÑ´Ù. PostScript ÆÄÀÏ·Î
Ãâ·ÂÇÏ°í ½Í´Ù¸é postscript ¸í·ÉÀ» ÀÌ¿ëÇÏ¸é µÈ´Ù. °£´ÜÇÏ°Ô´Â Ãâ·Â
ÆÄÀÏ À̸§¸¸ ÁöÁ¤ÇØ ÁÖ¸é µÈ´Ù. pdf, pictex, µîµîµµ ¸¶Âù°¡ÁöÀÌ´Ù.
{{{
> postscript("dnorm.ps")
> plot(dnorm, -3, 3)
> dev.off()
}}}
½ÇÁ¦·Î »ç¿ëÇÏ·Á¸é ´ÙÀ½Ã³·³ ±×¸²ÀÇ Å©±â¿Í ±Û²ÃÀÇ Å©±â¸¦ ÁöÁ¤Çؼ EPS·Î
ÀúÀåÇÑ ÈÄ ´Ù¸¥ ¹®¼¿¡ »ðÀÔÇϰųª ÇÏ°Ô µÉ °ÍÀÌ´Ù.
{{{
> postscript("plot1.eps", onefile=FALSE, horizontal=FALSE, height=4, width=4, pointsize=8)
}}}
ÀÚ¼¼ÇÑ »ç¿ë¹ýÀ» ¾Ë°í ½ÍÀ» ¶§´Â help ¸í·ÉÀ» ÀÌ¿ëÇϰųª ¸í·É¾î ¾Õ¿¡
¹°À½Ç¥(?)¸¦ ºÙÀÌ¸é µÈ´Ù.
{{{
> help("postscript")
}}}
{{{
> ?postscript
}}}
=== Cairo Graphics Device ===
Ä«ÀÌ·Î µð¹ÙÀ̽º ÆÐÅ°Áö¸¦ ¼³Ä¡Çϸé Ä«ÀÌ·Î º¤ÅÍ ±×·¡ÇȽº ¶óÀ̺귯¸®¸¦
ÀÌ¿ëÇÏ¿© Ãâ·ÂÇÒ ¼ö ÀÖ´Ù. screen, pdf, ps, svg, png·Î Ãâ·ÂÇÒ
¼ö ÀÖ´Ù.
¼³Ä¡´Â Debian °è¿¿¡¼
{{{
$ apt-get install r-cran-cairodevice
}}}
»ç¿ëÇÏ·Á¸é ¿ì¼± `cairoDevice` ¶óÀ̺귯¸®¸¦ ·ÎµåÇØ¾ß ÇÑ´Ù.
{{{
> library(cairoDevice)
}}}
ÀÌÁ¦ ±×·¡ÇÁ¸¦ Çϳª ±×·Áº¸ÀÚ.
{{{
> plot(dnorm, -3, 3)
}}}
PDF·Î Ãâ·ÂÇÒ ¶§´Â ´ÙÀ½Ã³·³ `Cairo_pdf` ¸í·ÉÀ» »ç¿ëÇÏ¸é µÈ´Ù. ´Ù¸¥
Æ÷¸Ëµµ ¸¶Âù°¡ÁöÀÌ´Ù. `help("Cairo")` ¸¦ Àо¸é »ç¿ë¹ýÀÌ ³ª¿Â´Ù.
{{{
> Cairo_pdf("plot.pdf")
> plot(dnorm, -3, 3)
> dev.off()
}}}
== R ±×·¡ÇÈ¿¡ ÇÑ±Û ¾²±â ==
R ±×·¡ÇÈÀº ¿À·§µ¿¾È ¼À¯·´¾î¿¡¼ »ç¿ëµÇ´Â ¹®ÀÚ¸¸ Áö¿øÇØ ¿Ô´Ù.
ÇöÀç¿¡µµ µû·Î ¼³Á¤ÇÏÁö ¾Ê´Â ÇÑ ¼À¯·´¾îÀÇ ¹®ÀÚ¸¸ Á¦´ë·Î Ãâ·ÂµÈ´Ù.
±× ÀÌ¿ÜÀÇ Áß¾ÓÀ¯·´¾îÀÇ ¹®ÀÚµé, ³¢¸± ¹®ÀÚ¿Í CJK ÆùÆ® µî ¼ÒÀ§
"ºñÇ¥ÁØ" ÆùÆ®ÀÇ Áö¿ø¿¡ °üÇÑ Àü¹ÝÀûÀÎ Á¤º¸´Â ´ÙÀ½ ¹®¼¸¦ ÂüÁ¶.
* Non-Standard Fonts in PostScript and PDF Graphics
''by Paul Murrell and Brian Ripley'' (http://cran.r-project.org/doc/Rnews/Rnews_2006-2.pdf 41--46ÂÊ)
°ü·Ã ±ÛŸ·¡:
* http://kldp.org/node/92497
=== ¿¹Á¦ ===
¼³¸íÀ» À§ÇØ ´ÙÀ½°ú °°Àº ¿¹Á¦ ÀڷḦ »ç¿ëÇÏ°Ú´Ù. Ä÷³Àº ÅÇÀ¸·Î
±¸ºÐµÇ¾î ÀÖ°í ÆÄÀÏÀ̸§Àº "baseball.txt"¶ó°í ÇÏÀÚ.
{{{
±¸´Ü ½Â·ü ÆÀŸÀ² Ãâ·çÀ² ÆÀ¹æ¾îÀ²
Çö´ë 0.628 0.264 0.347 3.26
ÇÑÈ 0.619 0.255 0.329 3.34
»ï¼º 0.610 0.249 0.332 3.05
SK 0.512 0.265 0.343 3.63
±â¾Æ 0.500 0.253 0.323 3.29
µÎ»ê 0.425 0.235 0.303 3.07
LG 0.381 0.254 0.317 4.47
·Ôµ¥ 0.317 0.218 0.293 3.63
}}}
* Çã¸íȸ, 2007, RÀ» È°¿ëÇÑ Å½»öÀû ÀÚ·áºÐ¼®, ÀÚÀ¯¾ÆÄ«µ¥¹Ì, p.192.
¿ì¼± ÀÌ ÆÄÀÏ¿¡¼ µ¥ÀÌÅ͸¦ ÀоîµéÀδÙ.
{{{
> bb <- read.table("baseball.txt", header=T)
> x <- bb[2:5]
> rownames(x) < bb[,1]
}}}
ÀÏ´Ü È¸éÀ¸·Î Ãâ·ÂÇØ º¸ÀÚ. ´ÙÀ½ ¸í·ÉÀ» ³»¸®¸é »êÁ¡µµ Çà·ÄÀ» ±×·ÁÁִµ¥
Ä÷³¸íÀÌ Çѱ۷ΠµÇ¾î ÀÖ¾î¼ ±úÁ®¼ ³ªÅ¸³¯ °ÍÀÌ´Ù.
{{{
> pairs(x)
}}}
=== Cairo ===
±âº»ÀûÀ¸·Î Á¦°øµÇ´Â x11, pdf, pictex µîÀ¸·Î ÇѱÛÀ»
Ãâ·ÂÇÏ·Á¸é ¹æ¹ýÀÌ ¾ø´Â °ÍÀº ¾Æ´ÏÁö¸¸ »óȲ¿¡ µû¶ó
¿©·¯°¡Áö ¹®Á¦°¡ »ý±ä´Ù.
Cairo ±×·¡ÇÈ µð¹ÙÀ̽º¸¦ ÀÌ¿ëÇÏ¸é ¹®Á¦°¡ ½±°Ô ÇØ°áµÈ´Ù.
»ç¿ëÇÏ·Á¸é cairoDevice ÆÐÅ°Áö°¡ ¼³Ä¡µÇ¾î ÀÖ¾î¾ß ÇÏ°í,
RÀ» ½ÃÀÛÇÑ ÈÄ¿¡ `cairoDevice` ¶óÀ̺귯¸®¸¦ ·ÎµåÇؾß
ÇÑ´Ù.
{{{
> library(cairoDevice)
}}}
´õ ÀÌ»ó ÇÊ¿äÇÑ °ÍÀº ¾ø´Ù. ´ÙÀ½Ã³·³ ¸í·ÉÀ» ³»¸®¸é
GTK+ âÀÌ ¶ß°í ÇѱÛÀ» Æ÷ÇÔÇÑ ±×·¡ÇÈÀÌ ÀÚ¿¬½º·´°Ô
±×·ÁÁú °ÍÀÌ´Ù.
{{{
> pairs(x)
}}}
|| [[HTML()]] || [[HTML()]] ||
|| stars(x,draw.segments=T,full=F,key.loc=c(7,2)) || pairs(x) ||
PDF, PS, SVG, PNG µîÀ¸·Î Ãâ·ÂÇÏ´Â °æ¿ì¿¡´Â `Cairo_pdf`, `Cairo_ps`, `Cairo_svg`, `Cairo_png` µîÀÇ ¸í·É¾î¸¦ ÀÌ¿ëÇÒ ¼ö ÀÖ´Ù.
{{{
> Cairo_pdf("plot.pdf")
> pairs(x)
}}}
Ãâ·Â °á°ú: attachment:bb-scatterplot-matrix-cairo.pdf
À§ ¹®¼¸¦ ¿¾îº¸¸é ȸé(`screen`)À¸·Î Ãâ·ÂÇÒ ¶§º¸´Ù ±ÛÀÚ Å©±â°¡ Å©°Ô ÂïÈù °ÍÀ» ¾Ë ¼ö ÀÖ´Ù. ±âº»°ªÀº
10Æ÷ÀÎÆ®·Î ¼³Á¤µÇ¾î ÀÖÁö¸¸, ÆÄÀÏ(`pdf`, `ps`, `png`, `svg`)·Î Ãâ·ÂÇÒ ¶§´Â ±ÛÀÚ Å©±â°¡ ±â´ëÇÑ
°Íº¸´Ù Å©°Ô ÂïÈ÷´Â ¹®Á¦°¡ ÀÖ´Ù.
À§ÀÇ °æ¿ì¿¡´Â ±×´ÙÁö º¸±â ½ÈÁö ¾ÊÁö¸¸ ±ÛÀÚ Å©±â°¡
Á¤ÇØÁø °Í º¸´Ù Å©°Ô ÂïÈ÷±â ¶§¹®¿¡ ±ÛÀÚ°¡ °ãÃļ
¹®Á¦°¡ µÇ´Â °æ¿ìµµ ÀÖ´Ù. ´ÙÀ½Ã³·³ 7Æ÷ÀÎÆ®·Î ÁöÁ¤ÇØ
ÁÖ¾î¾ß 10Æ÷ÀÎÆ® Á¤µµ Å©±â·Î ÂïÈù´Ù.
{{{
> Cairo_pdf("plot.pdf", pointsize=7)
> plot(x)
> dev.off()
}}}
Ãâ·Â °á°ú: attachment:bb-scatterplot-matrix-cairo-7p.pdf
¹®ÀÚµµ º¤ÅÍ ±×·¡ÇÈÀ¸·Î ¹Ù²î¾î ÂïÈ÷±â ¶§¹®¿¡ Ãâ·Â Æ÷¸ËÀ» ¾î¶² °ÍÀ¸·Î Çصµ ÆùÆ® ¹®Á¦´Â »ý±âÁö ¾Ê´Â´Ù.
=== PDF ===
PDF ±×·¡ÇÈ¿¡ ÇѱÛÀ» ¾²·Á¸é ´ÙÀ½°ú °°ÀÌ pdf ¸í·É¿¡ font family¸¦
ÁöÁ¤ÇØ ÁÖ¸é µÈ´Ù. ¹°·Ð, ¿©±â¼´Â ¸ðµÎ »ý·«ÇßÁö¸¸, ±×·¡ÇÈÀÇ °¡·Î ¼¼·Î Å©±â,
ÆùÆ® Å©±â µîµµ ÇÊ¿ä¿¡ µû¶ó Àû´çÇÏ°Ô ÁöÁ¤ÇØ ÁÖ¾î¾ß ÇÑ´Ù.
{{{
> pdf("plot.pdf", family="Korea1deb")
> pairs(x)
> dev.off()
}}}
´ÙÀ½°ú °°Àº °á°ú¸¦ ¾òÀ» ¼ö ÀÖ´Ù:
attachment:bb-scatterplot-matrix.pdf
ÀÌ·¸°Ô ¸¸µé¾îÁø PDF ±×·¡ÇÈ¿¡´Â ±Û²ÃÀÌ ÀÓº£µåµÇÁö ¾Ê±â ¶§¹®¿¡ ÇѱÛÀ»
Á¦´ë·Î µð½ºÇ÷¹ÀÌÇÏ°í Ãâ·ÂÇÏ·Á¸é ÇÊ¿äÇÑ ÆùÆ®°¡ ¼³Ä¡µÇ¾î ÀÖ¾î¾ß ÇÑ´Ù.
¹®Á¦¾øÀÌ »ç¿ëÇϱâ À§Çؼ´Â Adobe Reader¸¦ »ç¿ëÇÏ´Â ¹æ¹ý¹Û¿¡ ¾ø´Ù.
* ¸®´ª½º¿ë Çѱ¹¾î Adobe Reader¸¦ ¼³Ä¡Çϰųª, ¿µ¹® Adobe Reader ¼³Ä¡ ÈÄ
Çѱ¹¾î ÆùÆ® ÆÑÀ» ¼³Ä¡Çϸé `acroread`·Î À§ ¹®¼¸¦ ¾Æ¹« ¹®Á¦ ¾øÀÌ º¼ ¼öÀÖ´Ù.
* xpdf-koreanÀ» ¼³Ä¡Çϸé xpdf¿¡¼µµ À§ ¹®¼¸¦ º¼ ¼ö ÀÖ´Ù. ±×·¯³ª ¼ýÀÚ¿Í
¿µ¹®ÀÌ ÀÌ»óÇÏ°Ô °ãÃļ ³ª¿À´Â ¹®Á¦°¡ ÀÖ´Ù.
* poppler-data (http://poppler.freedesktop.org/)¸¦ ¼³Ä¡Çϸé
evince¿¡¼µµ ÇѱÛÀÌ Á¦´ë·Î º¸ÀδÙ.
* kpdf¿¡¼´Â ÇѱÛÀ» º¼ ¼ö ¾ø´Ù.
Âü°í·Î »ç¿ë°¡´ÉÇÑ CJK font family´Â ´ÙÀ½°ú °°Àº °ÍµéÀÌ ÀÖ´Ù. »ó¼¼ÇÑ
Á¤º¸´Â [http://cran.r-project.org/doc/Rnews/Rnews_2006-2.pdf Rnews_2006-2.pdf] ÀÇ
44ÂÊ ÂüÁ¶.
* Korea1
* Korea1deb
* Japan1
* Japan1HeiMin
* Japan1GothicBBB
* Japan1Ryumin
* CNS1
* GB1
=== X11 ===
ȸé(X11)À¸·Î Ãâ·ÂÇÒ ¶§µµ ÆùÆ®¸¦ ÁöÁ¤ÇØ ÁÖ¸é ÇѱÛÀ» »ç¿ëÇÒ ¼ö ÀÖ´Ù.
±âº»ÀûÀ¸·Î´Â Adobe Helvetica¸¦ »ç¿ëÇϵµ·Ï µÇ¾î Àִµ¥ ¼À¯·´¾îÀÇ ¹®ÀÚ¸¸
ÂïÈù´Ù.
´ÙÀ½Ã³·³ ÆùÆ®¸¦ ´ë¿ì °íµñÀ¸·Î ÁöÁ¤ÇØ ÁÖ¸é ÇѱÛÀÌ Á¦´ë·Î ³ªÅ¸³´Ù.
{{{
> X11(fonts=c("-daewoo-gothic-%s-%s-*-*-%d-*-*-*-*-*-*-*","-adobe-symbol-medium-r-*-*-%d-*-*-*-*-*-*-*"),pointsize=20)
> pairs(x)
}}}
`xfonts-baekmuk` ÆÐÅ°Áö¸¦ ¼³Ä¡Çß´Ù¸é ´ÙÀ½Ã³·³ ¹é¹¬ ±¼¸²À» »ç¿ëÇÒ ¼öµµ ÀÖ´Ù.
{{{
> X11(fonts=c("-baekmuk-gulim-%s-%s-*-*-%d-*-*-*-*-*-iso10646-1","-adobe-symbol-medium-r-*-*-%d-*-*-*-*-*-*-*"))
> pairs(x)
}}}
|| [[HTML()]] || [[HTML()]] || [[HTML()]] ||
|| X11 ±âº» (adobe helvetica) || ´ë¿ì °íµñ || ¹é¹¬ ±¼¸² ||
ÇѱÛÀÌ º¸À̱â´Â ÇÏÁö¸¸ ½É°¢ÇÑ ¹®Á¦°¡ ÀÖ´Ù. ½ºÅ©¸°¼¦¿¡ ³ªÅ¸³ °Íó·³ ¼ýÀÚ¿Í
¿µ¹®ÀÌ ¸ðµÎ Çѱ۷ΠġȯµÇ¾î ³ªÅ¸³´Ù.
=== PicTeX ===
R ±×·¡ÇÈÀ» ÅØ ¼Ò½º·Î Ãâ·ÂÇØ ÁÖ´Â ±â´Éµµ ÀÖ´Ù. pictex µð¹ÙÀ̽º¸¦ »ç¿ëÇϸé
µÈ´Ù.
´ÙÀ½Ã³·³ Çϸé bb-scatterplot-matrix.tex ¶ó´Â ÆÄÀÏÀÌ »ý±ä´Ù. ÆÄÀÏ ÀÎÄÚµùÀº
UTF-8À¸·Î À¯´ÏÄÚµå ¹®ÀÚµéÀÌ ¸ðµÎ Á¦´ë·Î Ãâ·ÂµÈ´Ù.
{{{
> pictex("bb-scatterplot-matrix.tex")
> pairs(x)
> dev.off()
}}}
ÀÌ·¸°Ô ¸¸µé¾îÁø ÆÄÀÏÀ» ´ÙÀ½Ã³·³ LaTeX ¹®¼ÀÇ ¿øÇÏ´Â À§Ä¡¿¡ ³Ö¾îÁÖ¸é µÈ´Ù.
{{{#!vim latex
\documentclass{article}
\usepackage{pictex}
\usepackage{kotex}
\usepackage{graphicx}
\begin{document}
\begin{figure}[h]
\centerline{\input{bb-scatterplot-matrix.tex}}
\caption{...}
\end{figure}
\end{document}
}}}
ÇѱÛÀ» Æ÷ÇÔÇؼ À¯´ÏÄÚµç ¹®ÀÚµéÀ» LaTeXÀ» ÀÌ¿ëÇؼ ±ò²ûÇÏ°Ô ÂïÀ» ¼ö ÀÖ´Ù.
ÆùÆ® ÀÓº£µù ¹®Á¦µµ »ç¶óÁø´Ù. ÇÊ¿äÇÏ´Ù¸é, LaTeX ¹®¼ÀÇ ¿øÇÏ´Â À§Ä¡¿¡ Á÷Á¢
³Ö´Â °ÍÀÌ ¾Æ´Ï¶ó ÇØ´ç ±×·¡Çȸ¸ EPS³ª PDF·Î ¸¸µé¾î¼ »ç¿ëÇÒ ¼öµµ ÀÖ´Ù.
attachment:bb-scatterplot-matrix-pictex.pdf
¹®Á¦´Â ÇÑ±Û ¹®ÀÚ¿ÀÇ À§Ä¡ °è»êÀÌ Á¦´ë·Î µÇÁö ¾Ê¾Æ ±â´ëµÇ´Â À§Ä¡¿¡¼ ¾à°£¾¿
¹þ¾î³´Ù´Â °ÍÀÌ´Ù. À§ÀÇ ¿¹¸¦ º¸¸é ÇÑ±Û ·¹À̺íÀÌ »óÀÚÀÇ ÇÑ°¡¿îµ¥ À§Ä¡ÇÏÁö
¾Ê°í ¾à°£¾¿ ¿ÞÂÊ À§·Î Ä¡¿ìÃÄÁø °ÍÀ» º¼ ¼ö ÀÖ´Ù. ÀÌ ¿¹Á¦ÀÇ °æ¿ì¿¡´Â ¹«¸®¾øÀÌ
»ç¿ëÇÒ ¼ö ÀÖ°í ¹®Á¦°¡ µÇ´Â °ÍÀÌ ¸î°³ µÇÁö ¾ÊÀ¸¹Ç·Î ¼öÀÛ¾÷·Î Á¶Á¤ÇØ Á־
µÈ´Ù. ÇÏÁö¸¸ ·¹À̺íÀÇ °³¼ö°¡ ¸¹°í À§Ä¡°¡ Áß¿äÇÑ °æ¿ì¿¡´Â »ç¿ëÇϱ⠾î·Æ´Ù.