R 필수 설치 패키지

진행에 필요한 예제파일 다운로드

• https://cafe.naver.com/peelr/1070

• 압축 풀고 폴더명 'r-ggagi-data'로 변경할 것

필수 설치 패키지

install.packages('ggplot2')
Installing package into 'C:/Users/205/Documents/R/win-library/3.6'
(as 'lib' is unspecified)
also installing the dependency 'isoband'
package 'isoband' successfully unpacked and MD5 sums checked
package 'ggplot2' successfully unpacked and MD5 sums checked

The downloaded binary packages are in
    C:\Users\205\AppData\Local\Temp\RtmpQFLiJf\downloaded_packages

install.packages('ggthemes')
Installing package into 'C:/Users/205/Documents/R/win-library/3.6'
(as 'lib' is unspecified)
package 'ggthemes' successfully unpacked and MD5 sums checked

The downloaded binary packages are in
    C:\Users\205\AppData\Local\Temp\RtmpQFLiJf\downloaded_packages

install.packages('data.table')
Installing package into 'C:/Users/205/Documents/R/win-library/3.6'
(as 'lib' is unspecified)
package 'data.table' successfully unpacked and MD5 sums checked

The downloaded binary packages are in
    C:\Users\205\AppData\Local\Temp\RtmpQFLiJf\downloaded_packages

install.packages('devtools')
Installing package into 'C:/Users/205/Documents/R/win-library/3.6'
(as 'lib' is unspecified)
also installing the dependencies 'rematch2', 'usethis', 'callr', 'DT', 'glue'
package 'rematch2' successfully unpacked and MD5 sums checked
package 'usethis' successfully unpacked and MD5 sums checked
package 'callr' successfully unpacked and MD5 sums checked
package 'DT' successfully unpacked and MD5 sums checked
package 'glue' successfully unpacked and MD5 sums checked
package 'devtools' successfully unpacked and MD5 sums checked

The downloaded binary packages are in
    C:\Users\205\AppData\Local\Temp\RtmpQFLiJf\downloaded_packages

install.packages('dplyr')
Installing package into 'C:/Users/205/Documents/R/win-library/3.6'
(as 'lib' is unspecified)
also installing the dependencies 'pillar', 'lifecycle', 'rlang', 'tibble', 'tidyselect', 'vctrs'
package 'pillar' successfully unpacked and MD5 sums checked
package 'lifecycle' successfully unpacked and MD5 sums checked
package 'rlang' successfully unpacked and MD5 sums checked
Warning message:
"cannot remove prior installation of package 'rlang'"Warning message in file.copy(savedcopy, lib, recursive = TRUE):
"C:\Users\205\Documents\R\win-library\3.6\00LOCK\rlang\libs\x64\rlang.dll를 C:\Users\205\Documents\R\win-library\3.6\rlang\libs\x64\rlang.dll로 복사하는데 문제가 발생했습니다: Permission denied"Warning message:
"restored 'rlang'"
package 'tibble' successfully unpacked and MD5 sums checked
package 'tidyselect' successfully unpacked and MD5 sums checked
package 'vctrs' successfully unpacked and MD5 sums checked
package 'dplyr' successfully unpacked and MD5 sums checked

The downloaded binary packages are in
    C:\Users\205\AppData\Local\Temp\RtmpQFLiJf\downloaded_packages

install.packages('plyr')
Installing package into 'C:/Users/205/Documents/R/win-library/3.6'
(as 'lib' is unspecified)
package 'plyr' successfully unpacked and MD5 sums checked

The downloaded binary packages are in
    C:\Users\205\AppData\Local\Temp\RtmpQFLiJf\downloaded_packages

install.packages('reshape2')
Installing package into 'C:/Users/205/Documents/R/win-library/3.6'
(as 'lib' is unspecified)
package 'reshape2' successfully unpacked and MD5 sums checked

The downloaded binary packages are in
    C:\Users\205\AppData\Local\Temp\RtmpQFLiJf\downloaded_packages

install.packages('scales')
Installing package into 'C:/Users/205/Documents/R/win-library/3.6'
(as 'lib' is unspecified)
also installing the dependency 'farver'
package 'farver' successfully unpacked and MD5 sums checked
package 'scales' successfully unpacked and MD5 sums checked

The downloaded binary packages are in
    C:\Users\205\AppData\Local\Temp\RtmpQFLiJf\downloaded_packages

install.packages('stringr')
Installing package into 'C:/Users/205/Documents/R/win-library/3.6'
(as 'lib' is unspecified)
package 'stringr' successfully unpacked and MD5 sums checked

The downloaded binary packages are in
    C:\Users\205\AppData\Local\Temp\RtmpQFLiJf\downloaded_packages

# 설치 패키지 목록보기 1
library()

# 설치 패키지 목록보기 2
#installed.packages()

#installed.packages()[,c('Package','Version')]

도움말 help

검색

• http://rseek.org : R 관련 자료만 검색 해줌

Reference 문서 참고

• http://cran.r-project.org/manuals.html

# R 자체 도움말
help('rep')

?rep

help(ggplot2::gplot)
Error in help(ggplot2::gplot): 'topic' should be a name, length-one character vector or reserved word
Traceback:

1. help(ggplot2::gplot)
2. stop("'topic' should be a name, length-one character vector or reserved word")

패키지 설치 및 help

R에서 외부데이터 읽기

---

CSV 읽기

List <- read.csv('r-ggagi-data/example_studentlist.csv')
List

name	sex	age	grade	absence	bloodtype	height	weight
김길동	남자	23	3	유	O	165.3	68.2
이미린	여자	22	2	무	AB	170.1	53.0
홍길동	남자	24	4	무	B	175.0	80.1
김철수	남자	23	3	무	AB	182.1	85.7
손세수	여자	20	1	유	A	168.0	49.5
박미희	여자	21	2	무	O	162.0	52.0
강수친	여자	22	1	무	O	155.2	45.3
이희수	여자	23	1	무	A	176.9	55.0
이철린	남자	23	3	무	B	178.5	64.2
방희철	남자	22	2	무	B	176.1	61.3
박수호	남자	24	4	유	O	167.1	62.0
임동민	남자	22	2	무	AB	180.0	75.8
김민수	남자	21	1	무	A	162.2	55.3
이희진	여자	23	3	무	O	176.1	53.1
김미진	여자	22	2	무	B	158.2	45.2
김동수	남자	24	4	유	B	168.6	70.2
여수근	남자	21	1	무	A	169.2	62.2

List <- read.csv('r-ggagi-data/example_studentlist.csv', header = F)
List

V1	V2	V3	V4	V5	V6	V7	V8
name	sex	age	grade	absence	bloodtype	height	weight
김길동	남자	23	3	유	O	165.3	68.2
이미린	여자	22	2	무	AB	170.1	53
홍길동	남자	24	4	무	B	175	80.1
김철수	남자	23	3	무	AB	182.1	85.7
손세수	여자	20	1	유	A	168	49.5
박미희	여자	21	2	무	O	162	52
강수친	여자	22	1	무	O	155.2	45.3
이희수	여자	23	1	무	A	176.9	55
이철린	남자	23	3	무	B	178.5	64.2
방희철	남자	22	2	무	B	176.1	61.3
박수호	남자	24	4	유	O	167.1	62
임동민	남자	22	2	무	AB	180	75.8
김민수	남자	21	1	무	A	162.2	55.3
이희진	여자	23	3	무	O	176.1	53.1
김미진	여자	22	2	무	B	158.2	45.2
김동수	남자	24	4	유	B	168.6	70.2
여수근	남자	21	1	무	A	169.2	62.2

---

TXT 읽기

# read.table() - 구분자 Tab이 기본, header=F 가 기본
List <- read.table('r-ggagi-data/studentlist.txt')
List

V1	V2	V3	V4	V5	V6	V7
이름	성별	나이	학년	휴학여부	혈액형	키
김길동	남자	23	3	유	O	165.3
이미린	여자	22	2	무	AB	170.1
홍길동	남자	24	4	무	B	175
김철수	남자	23	3	무	AB	182.1
손세수	여자	20	1	유	A	168
박미희	여자	21	2	무	O	162
강수친	여자	22	1	무	O	155.2
이희수	여자	23	1	무	A	176.9
이철린	남자	23	3	무	B	178.5
방희철	남자	22	2	무	B	176.1
박수호	남자	24	4	유	O	167.1
임동민	남자	22	2	무	AB	180
김민수	남자	21	1	무	A	162.2
이희진	여자	23	3	무	O	176.1
김미진	여자	22	2	무	B	158.2
김동수	남자	24	4	유	B	168.6
여수근	남자	21	1	무	A	169.2

List <- read.table('r-ggagi-data/studentlist.txt', header = T)
List

이름	성별	나이	학년	휴학여부	혈액형	키
김길동	남자	23	3	유	O	165.3
이미린	여자	22	2	무	AB	170.1
홍길동	남자	24	4	무	B	175.0
김철수	남자	23	3	무	AB	182.1
손세수	여자	20	1	유	A	168.0
박미희	여자	21	2	무	O	162.0
강수친	여자	22	1	무	O	155.2
이희수	여자	23	1	무	A	176.9
이철린	남자	23	3	무	B	178.5
방희철	남자	22	2	무	B	176.1
박수호	남자	24	4	유	O	167.1
임동민	남자	22	2	무	AB	180.0
김민수	남자	21	1	무	A	162.2
이희진	여자	23	3	무	O	176.1
김미진	여자	22	2	무	B	158.2
김동수	남자	24	4	유	B	168.6
여수근	남자	21	1	무	A	169.2

List <- read.table('r-ggagi-data/studentlist2.txt', header = T, sep = ';')
List

이름	성별	나이	학년	휴학여부	혈액형	키
김길동	남자	23	3	유	O	165.3
이미린	여자	22	2	무	AB	170.1
홍길동	남자	24	4	무	B	175.0
김철수	남자	23	3	무	AB	182.1
손세수	여자	20	1	유	A	168.0
박미희	여자	21	2	무	O	162.0
강수친	여자	22	1	무	O	155.2
이희수	여자	23	1	무	A	176.9
이철린	남자	23	3	무	B	178.5
방희철	남자	22	2	무	B	176.1
박수호	남자	24	4	유	O	167.1
임동민	남자	22	2	무	AB	180.0
김민수	남자	21	1	무	A	162.2
이희진	여자	23	3	무	O	176.1
김미진	여자	22	2	무	B	158.2
김동수	남자	24	4	유	B	168.6
여수근	남자	21	1	무	A	169.2

---

Excel 읽기

• readxl 패키지 사용

install.packages('readxl')
Installing package into 'C:/Users/205/Documents/R/win-library/3.6'
(as 'lib' is unspecified)
package 'readxl' successfully unpacked and MD5 sums checked

The downloaded binary packages are in
    C:\Users\205\AppData\Local\Temp\RtmpQFLiJf\downloaded_packages

library('readxl')

df <- read_excel(path = 'r-ggagi-data/studentlist.xlsx', sheet = 'Sheet1', col_names = TRUE)
df

name	sex	age	grade	absence	bloodtype	height	weight
김길동	남자	23	3	유	O	165.3	68.2
이미린	여자	22	2	무	AB	170.1	53.0
홍길동	남자	24	4	무	B	175.0	80.1
김철수	남자	23	3	무	AB	182.1	85.7
손세수	여자	20	1	유	A	168.0	49.5
박미희	여자	21	2	무	O	162.0	52.0
강수친	여자	22	1	무	O	155.2	45.3
이희수	여자	23	1	무	A	176.9	55.0
이철린	남자	23	3	무	B	178.5	64.2
방희철	남자	22	2	무	B	176.1	61.3
박수호	남자	24	4	유	O	167.1	62.0
임동민	남자	22	2	무	AB	180.0	75.8
김민수	남자	21	1	무	A	162.2	55.3
이희진	여자	23	3	무	O	176.1	53.1
김미진	여자	22	2	무	B	158.2	45.2
김동수	남자	24	4	유	B	168.6	70.2
여수근	남자	21	1	무	A	169.2	62.2

df <- read_excel(path = 'r-ggagi-data/studentlist.xlsx', sheet = 'Sheet1', col_names = F)
df
New names:
* `` -> ...1
* `` -> ...2
* `` -> ...3
* `` -> ...4
* `` -> ...5
* ...

...1	...2	...3	...4	...5	...6	...7	...8
name	sex	age	grade	absence	bloodtype	height	weight
김길동	남자	23	3	유	O	165.3	68.2
이미린	여자	22	2	무	AB	170.1	53
홍길동	남자	24	4	무	B	175	80.099999999999994
김철수	남자	23	3	무	AB	182.1	85.7
손세수	여자	20	1	유	A	168	49.5
박미희	여자	21	2	무	O	162	52
강수친	여자	22	1	무	O	155.19999999999999	45.3
이희수	여자	23	1	무	A	176.9	55
이철린	남자	23	3	무	B	178.5	64.2
방희철	남자	22	2	무	B	176.1	61.3
박수호	남자	24	4	유	O	167.1	62
임동민	남자	22	2	무	AB	180	75.8
김민수	남자	21	1	무	A	162.19999999999999	55.3
이희진	여자	23	3	무	O	176.1	53.1
김미진	여자	22	2	무	B	158.19999999999999	45.2
김동수	남자	24	4	유	B	168.6	70.2
여수근	남자	21	1	무	A	169.2	62.2

---

SPSS 프로그램 sav 읽기

• SPSS 통계 프로그램

• foreign 패키지 사용

install.packages('foreign')
Installing package into 'C:/Users/205/Documents/R/win-library/3.6'
(as 'lib' is unspecified)
Warning message:
"package 'foreign' is not available (for R version 3.6.1)"

library('foreign')

Score <- read.spss('r-ggagi-data/score.sav')
Score

foreign 패키지 사용

---

XML 읽기

• XML 패키지 사용

install.packages('XML')
Installing package into 'C:/Users/205/Documents/R/win-library/3.6'
(as 'lib' is unspecified)
package 'XML' successfully unpacked and MD5 sums checked

The downloaded binary packages are in
    C:\Users\205\AppData\Local\Temp\RtmpQFLiJf\downloaded_packages

library('XML')
Warning message:
"package 'XML' was built under R version 3.6.3"

DocFromXML <- xmlTreeParse('r-ggagi-data/score.xml')
DocFromXML
$doc
$file
[1] "r-ggagi-data/score.xml"

$version
[1] "1.0"

$children
$children$mathscore
<mathscore>
 <student>
  <name>Peter</name>
  <score>100</score>
 </student>
 <student>
  <name>Abel</name>
  <score>90</score>
 </student>
 <student>
  <name>Elin</name>
  <score>80</score>
 </student>
</mathscore>


attr(,"class")
[1] "XMLDocumentContent"

$dtd
$external
NULL

$internal
NULL

attr(,"class")
[1] "DTDList"

attr(,"class")
[1] "XMLDocument"         "XMLAbstractDocument"

DocFromXML <- xmlTreeParse('r-ggagi-data/score.xml', useInternalNodes = T)
DocFromXML
<?xml version="1.0"?>
<mathscore>
  <student>
    <name>Peter</name>
    <score>100</score>
  </student>
  <student>
    <name>Abel</name>
    <score>90</score>
  </student>
  <student>
    <name>Elin</name>
    <score>80</score>
  </student>
</mathscore>

RootNode <- xmlRoot(DocFromXML)
RootNode
<mathscore>
  <student>
    <name>Peter</name>
    <score>100</score>
  </student>
  <student>
    <name>Abel</name>
    <score>90</score>
  </student>
  <student>
    <name>Elin</name>
    <score>80</score>
  </student>
</mathscore> 

Names <- xpathSApply(RootNode, '//name', xmlValue)
Names

Scores <- xpathSApply(RootNode, '//score', xmlValue)
Scores

# Data 합치기
NameScore = data.frame(NAME=Names, SCORE=Scores)
NameScore

# Ctrl + C, Ctrl + V 로 가져오기
List <- read.delim("clipboard", header = F)
List
Warning message in read.table(file = file, header = header, sep = sep, quote = quote, :
"'clipboard'에서 readTableHeader에 의하여 발견된 완성되지 않은 마지막 라인입니다"

V1	V2	V3	V4	V5	V6	V7	V8
김길동	남자	23	3	유	O	165.3	68.2
이미린	여자	22	2	무	AB	170.1	53.0

클립보드에 아무것도 없으면 위와같이 출력됨

---

Github으로 패키지 설치 하기

install.packages('devtools')
Installing package into 'C:/Users/205/Documents/R/win-library/3.6'
(as 'lib' is unspecified)
package 'devtools' successfully unpacked and MD5 sums checked

The downloaded binary packages are in
    C:\Users\205\AppData\Local\Temp\RtmpQFLiJf\downloaded_packages

library('devtools')
Warning message:
"package 'devtools' was built under R version 3.6.3"Loading required package: usethis
Warning message:
"package 'usethis' was built under R version 3.6.3"

# github.com/yihui/knitr
install.packages('yihui/knitr')