IT ์‚ฌ๋ฌผํ•จ ๐Ÿป ์ž์„ธํžˆ๋ณด๊ธฐ

R 7

์ˆ˜์—…์ž๋ฃŒ์ •๋ฆฌ :ํ†ต๊ณ„๋ถ„์„/๊ฐ€์„ค ๊ฒ€์ •

๊ธฐ์ˆ  ํ†ต๊ณ„ : ๋ฐ์ดํ„ฐ๋ฅผ ์š”์•ฝํ•ด ์„ค๋ช…ํ•˜๋Š” ํ†ต๊ณ„๊ธฐ๋ฒ• ์ถ”๋ก  ํ†ต๊ณ„ : ๋‹จ์ˆœํžˆ ์ˆซ์ž๋ฅผ ์š”์•ฝํ•˜๋Š” ๊ฒƒ์„ ๋„˜์–ด ์–ด๋–ค ๊ฐ’์ด ๋ฐœ์ƒํ•  ํ™•๋ฅ ์„ ๊ณ„์‚ฐํ•˜๋Š” ํ†ต๊ณ„ ์–ด๋– ํ•œ ์ฐจ์ด๊ฐ€ ์šฐ์—ฐํžˆ ๋‚˜ํƒ€๋‚  ํ™•๋ฅ ์ด ์ž‘๋‹ค๋ฉด >> ์œ ์˜ํ•˜๋‹ค๋Š” ๊ฒฐ๋ก  ์–ด๋– ํ•œ ์ฐจ์ด๊ฐ€ ์šฐ์—ฐํžˆ ๋‚˜ํƒ€๋‚  ํ™•๋ฅ ์ด ํฌ๋‹ค๋ฉด >> ์œ ์˜ํ•˜์ง€ ์•Š๋‹ค๋ผ๋Š” ๊ฒฐ๋ก  ์œ ์˜ ํ™•๋ฅ ์„ ํ†ตํ•ด ๊ฐ€์„ค์„ ๊ฒ€์ •ํ•˜๋Š” ๋ฐฉ๋ฒ• : ํ†ต๊ณ„์  ๊ฐ€์„ค ๊ฒ€์ •. ์œ ์˜ ํ™•๋ฅ  : ์‹ค์ œ๋กœ ์ง‘๋‹จ ๊ฐ„ ์ฐจ์ด๊ฐ€ ์—†๋Š”๋ฐ ์šฐ์—ฐํžˆ ์ฐจ์ด๊ฐ€ ์žˆ๋Š” ๋ฐ์ดํ„ฐ๊ฐ€ ์ถ”์ถœ๋  ํ™•๋ฅ  p > H0๊ธฐ๊ฐ, H1์„ ํƒ p >= (a=0.05) >> H0 t ๊ฒ€์ •- ๋‘ ์ง‘๋‹จ์˜ ํ‰๊ท  ๋น„๊ต H0 : ๋‘ ์ง‘๋‹จ์˜ ํ‰๊ท ์˜ ์ฐจ์ด๊ฐ€ ์—†๋‹ค. H1 : ๋‘ ์ง‘๋‹จ์˜ ํ‰๊ท ์˜ ์ฐจ์ด๊ฐ€ ์žˆ๋‹ค. t- ๊ฒ€์ •์€ ๋‘ ์ง‘๋‹จ์˜ ํ‰๊ท ์— ํ†ต๊ณ„์ ์œผ๋กœ ์œ ์˜ํ•œ ์ฐจ์ด๊ฐ€ ์žˆ๋Š”์ง€ ์•Œ์•„๋ณผ๋•Œ ์‚ฌ์šฉํ•˜๋Š” ํ†ต๊ณ„๋ถ„์„ ๊ธฐ๋ฒ•..

R 2019.05.31

์ˆ˜์—…์ž๋ฃŒ์ •๋ฆฌ : ํ…์ŠคํŠธ ๋งˆ์ด๋‹

ํ…์ŠคํŠธ ๋งˆ์ด๋‹ ๋ฌธ์ž๋กœ ๋œ ๋ฐ์ดํ„ฐ์—์„œ ๊ฐ€์น˜์žˆ๋Š” ์ •๋ณด๋ฅผ ์–ป๋Š” ๋ถ„์„ ๊ธฐ๋ฒ• >> 'ํ…์ŠคํŠธ ๋งˆ์ด๋‹' ํ…์ŠคํŠธ ๋งˆ์ด๋‹์„ ํ• ๋•Œ ๊ฐ€์žฅ ๋จผ์ €ํ•˜๋Š” ์ž‘์—…์€ 'ํ˜•ํƒœ์†Œ ๋ถ„์„'์ด๋‹ค. ํ•œ๊ธ€ ์ž์—ฐ์–ด ๋ถ„์„ ํŒจํ‚ค์ง€ KoNLP ๋ฅผ ์ด์šฉํ•˜์—ฌ ํ˜•ํƒœ์†Œ ๋ถ„์„์„ ํ•  ์ˆ˜์žˆ๋‹ค. Rstudio ์—์„œ ํŒจํ‚ค์ง€๋ฅผ ์„ค์น˜ํ•œ๋‹ค install.packages("rJava") install.packages("memoise") install.packages("KoNLP") library(KoNLP) library(dplyr) *์‚ฌ์ „ ์„ค์ •ํ•˜๊ธฐ KoNLP์—์„œ ์ง€์›ํ•˜๋Š” ์‚ฌ์ „์€ 98๋งŒ์—ฌ๊ฐœ์˜ ๋‹จ์–ด๋กœ ๊ตฌ์„ฑ๋˜์–ด์žˆ๋‹ค. ๋”ฐ๋ผ์„œ useNIADic()๋ฅผ ์ž…๋ ฅํ•ด์„œ ์„ค์ •ํ•œ๋‹ค. *ํŠน์ˆ˜๋ฌธ์ž ์ œ๊ฑฐํ•˜๊ธฐ ๋ฌธ์žฅ์— ์ด๋ชจํ‹ฐ์ฝ˜์ด๋‚˜ ํŠน์ˆ˜๋ฌธ์ž๊ฐ€ ํฌํ•จ๋˜์–ด ์žˆ์œผ๋ฉด ์˜ค๋ฅ˜๊ฐ€ ๋ฐœ์ƒํ•œ๋‹ค. stringr์˜ str_repla..

R 2019.05.30

R๋ฐ์ดํ„ฐ ๋ถ„์„ 4

group_by() - ์ง‘๋‹จ๋ณ„๋กœ ๋‚˜๋ˆ„๊ธฐ left_join() - ๋ฐ์ดํ„ฐ ํ•ฉ์น˜๊ธฐ(์—ด) bind_rows() - ๋ฐ์ดํ„ฐ ํ•ฉ์น˜๊ธฐ(ํ–‰) %>%๊ธฐํ˜ธ๋ฅผ ์ด์šฉํ•ด ์ž‘์„ฑํ•œ๋‹ค. ex) exam %>% filter(class ==1) exam์„ ์ถœ๋ ฅํ•˜๋˜ class๊ฐ€ 1์ธ ํ–‰๋งŒ ์ถ”์ถœํ•˜๋ผ๋Š” ์กฐ๊ฑด์ด๋‹ค. %>% ๊ธฐํ˜ธ๋Š” 'ํŒŒ์ดํ”„ ์—ฐ์‚ฐ์ž'๋ผ๊ณ  ํ•ฉ๋‹ˆ๋‹ค. %>%๋Š” ๋ฌผ๊ธธ์„ ์—ฐ๊ฒฐํ•˜๋Š” ํŒŒ์ดํ”„์ฒ˜๋Ÿผ ํ•จ์ˆ˜๋“ค์„ ์—ฐ๊ฒฐํ•ฉ๋‹ˆ๋‹ค. != "๊ฐ™์ง€์•Š๋‹ค"๋ฅผ ์˜๋ฏธํ•œ๋‹ค. & "๊ทธ๋ฆฌ๊ณ "๋ฅผ ์˜๋ฏธํ•œ๋‹ค. or / | ๊ธฐํ˜ธ "๋˜๋Š”"๋ฅผ ์˜๋ฏธํ•œ๋‹ค. %in% ๊ธฐํ˜ธ์™€ c() ํ•จ์ˆ˜๋ฅผ ์ด์šฉํ•ด ์กฐ๊ฑด ๋ชฉ๋ก์„ ์ž…๋ ฅํ•œ๋‹ค. %in% ๊ธฐํ˜ธ๋Š” ๋ณ€์ˆ˜์˜ ๊ฐ’์ด ์ง€์ •ํ•œ ์กฐ๊ฑด ๋ชฉ๋ก์— ํ•ด๋‹นํ•˜๋Š”์ง€ ํ™•์ธํ•˜๋Š” ๊ธฐ๋Šฅ์„ ํ•œ๋‹ค. ex) exam %>% filter(class %in% c(1,3,5)) #1,3,5๋ฐ˜์— ํ•ด..

R 2019.04.15

์‰ฝ๊ฒŒ ๋ฐฐ์šฐ๋Š” R๋ฐ์ดํ„ฐ ๋ถ„์„, ๋ถ„์„๋„์ „

library ํ•จ์ˆ˜๋ฅผ ํ†ตํ•ด ggplot2์™€readxl์„ ๋ถˆ๋Ÿฌ์˜จ๋‹ค. gglot2 ์†์— ํฌํ•จ๋œ midwest์ž๋ฃŒ๋ฅผ ๋ฐ์ดํ„ฐํ”„๋ ˆ์ž„ ํ˜•ํƒœ๋กœ ๋ถˆ๋Ÿฌ์˜จ๋‹ค. dim()ํ•จ์ˆ˜๋ฅผ ํ†ตํ•ด midwest์˜ ํ–‰๊ณผ ์—ด์„ ํŒŒ์•…ํ•œ๋‹ค. 437ํ–‰๊ณผ 28์—ด์ด๋‹ค. str() ํ•จ์ˆ˜๋ฅผ ํ†ตํ•ด ๋ฐ์ดํ„ฐ์˜ ์†์„ฑ์„ ํŒŒ์•…ํ•œ๋‹ค. int, chr, num๋“ฑ์ด ์žˆ๋‹ค. summary() ํ•จ์ˆ˜๋ฅผ ํ†ตํ•ด ๊ฐ ์ตœ์†Œ ์ตœ๋Œ€๋“ฑ ์š”์•ฝ ํ†ต๊ณ„๋Ÿ‰์„ ํŒŒ์•…ํ•œ๋‹ค. library()ํ•จ์ˆ˜๋ฅผ ํ†ตํ•ด dplyr๋ฅผ ๋ถ€๋ฅธ๋‹ค. rename()ํ•จ์ˆ˜๋ฅผ ํ†ตํ•ด poptotal์„ total๋กœ popasian์„ asian์œผ๋กœ ์ด๋ฆ„์„ ๋ฐ”๊พผ๋‹ค. (asian/total)*100์˜ ์ˆ˜์‹์„ ํ†ตํ•ด '์ „์ฒด ์ธ๊ตฌ ๋Œ€๋น„ ์•„์‹œ์•„ ์ธ๊ตฌ ๋ฐฑ๋ถ„์œจ'์„ ๊ตฌํ•˜๊ณ  hist()ํ•จ์ˆ˜๋ฅผ ํ†ตํ•ด ํžˆ์Šคํ† ๊ทธ๋žจ์„ ๋งŒ๋“ค์–ด ํ™•์ธํ•ด ๋ณด์•˜๋‹ค. ์•„์‹œ์•„ ์ธ๊ตฌ ๋ฐฑ๋ถ„์œจ ์ „..

R 2019.04.08

R ๋ฐ์ดํ„ฐ๋ถ„์„ 3

"ํŒจํ‚ค์ง€" ํŒจํ‚ค์ง€๋ž€ ํŠน์ •ํ•œ ๊ธฐ๋Šฅ์„ ๊ฐ€์ง€๊ณ  ์žˆ๋Š” ํ•จ์ˆ˜๋ฅผ ์—ฌ๋Ÿฌ๊ฐœ ๋‹ด๊ณ ์žˆ๋Š” ๊พธ๋Ÿฌ๋ฏธ์ด๋‹ค. ggplot2 ํŒจํ‚ค์ง€ *๊ทธ๋ž˜ํ”„๋ฅผ ๋งŒ๋“ค ๋•Œ ๊ฐ€์žฅ ๋งŽ์ด ์‚ฌ์šฉํ•˜๋Š” ํŒจํ‚ค์ง€ ์ค‘ ํ•˜๋‚˜์ด๋‹ค. ํŒจํ‚ค์ง€ ์„ค์น˜ํ•˜๊ธฐ! ํŒจํ‚ค์ง€ ์„ค์น˜ํ•˜๊ธฐ >> ํŒจํ‚ค์ง€ ๋กœ๋“œํ•˜๊ธฐ >> ํ•จ์ˆ˜ ์‚ฌ์šฉํ•˜๊ธฐ *ํŒจํ‚ค์ง€๋ฅผ ๋กœ๋“œํ•˜๋Š” ์ž‘์—…์€ R์ŠคํŠœ๋””์˜ค๋ฅผ ์ƒˆ๋กœ ์‹œ์ž‘ํ• ๋•Œ๋งˆ๋‹ค ๋ฐ˜๋ณตํ•ด์•ผ ํ•œ๋‹ค. -ํŒจํ‚ค์ง€ ์„ค์น˜ํ•˜๊ธฐ install.packages()๋ฅผ ์ด์šฉํ•˜์—ฌ ์›ํ•˜๋Š” ํŒจํ‚ค์ง€๋ฅผ ( ) ์— ์ ์–ด์•ผํ•œ๋‹ค *์ด๋•Œ ํŒจํ‚ค์ง€ ์ด๋ฆ„์˜ ์•ž๋’ค์— ๋ฐ˜๋“œ์‹œ " " ์„ ๋„ฃ์–ด์•ผ ํ•œ๋‹ค. -ํŒจํ‚ค์ง€ ๋กœ๋“œํ•˜๊ธฐ ํŒจํ‚ค์ง€๋ฅผ ๋กœ๋“œํ•˜๊ธฐ ์œ„ํ•ด์„œ๋Š” library๋ฅผ ์‚ฌ์šฉํ•œ๋‹ค qplot() ํ•จ์ˆ˜ ggplot2 ํŒจํ‚ค์ง€ ์†์— ์žˆ๋Š” ํ•จ์ˆ˜๋กœ ๋นˆ๋„ ๋ง‰๋Œ€ ๊ทธ๋ž˜ํ”„๋ฅผ ์ถœ๋ ฅํ•œ๋‹ค. *geom์„ ํ†ตํ•ด ๊ทธ๋ž˜ํ”„๋ฅผ ์„ , ์ƒ์ž ๋“ฑ ๋ชจ์–‘์„ ์„ ํƒ ํ•  ์ˆ˜ ์žˆ๋‹ค. *colou..

R 2019.03.26

R ๋ฐ์ดํ„ฐ ๋ถ„์„ ๋ฐฐ์šฐ๊ธฐ

R์ด๋ž€! R์€ ๋ฐ์ดํ„ฐ๋ฅผ ๋ถ„์„ํ•˜๋Š” ์†Œํ”„ํŠธ์›จ์–ด์ด๋‹ค. R์€ ์ˆ˜๋งŽ์€ ๋ฐ์ดํ„ฐ ๋ถ„์„ ๋„๊ตฌ๋“ค ์‚ฌ์ด์—์„œ ๊ฐ€์žฅ๋งŽ์ด ์“ฐ์ด๋ฉฐ ์ธ๊ธฐ๋„ ๋†’๋‹ค. R์ด ์“ฐ์ด๋Š” ๊ณณ R์€ ๋ฒ”์šฉ ๋ถ„์„ ํˆด์ด๋‹ค ๋”ฐ๋ผ์„œ ์–ด๋–ค ํ˜•ํƒœ์˜ ๋ฐ์ดํ„ฐ๋“  ์ž์œ ๋กญ๊ฒŒ ๋ถ„์„ ํ•  ์ˆ˜ ์žˆ๋‹ค. โ—ํ†ต๊ณ„๋ถ„์„ โ—๋จธ์‹ ๋Ÿฌ๋‹ ๋ชจ๋ธ๋ง โ—ํ…์ŠคํŠธ ๋งˆ์ด๋‹ โ—์†Œ์…œ ๋„คํŠธ์›Œํฌ ๋ถ„์„ โ—์ง€๋„ ์‹œ๊ฐํ™” โ—์ฃผ์‹๋ถ„์„ โ—์ด๋ฏธ์ง€/์‚ฌ์šด๋“œ ๋ถ„์„ R์€ ๋ฌด๋ฃŒ! SAS,SPSS๋“ฑ ์ด์ „๋ถ€ํ„ฐ ๋งŽ์ด ์‚ฌ์šฉํ•ด ์˜ค๋˜ ๋ฐ์ดํ„ฐ ๋ถ„์„ ์†Œํ”„ํŠธ์›จ์–ด๋Š” ์œ ๋ฃŒ์ด๋‹ค ํ•˜์ง€๋งŒ R์€ ๋ฌด๋ฃŒ์ธ ์˜คํ”ˆ์†Œ์Šค์ด๋‹ค. ์˜คํ”ˆ์†Œ์Šค์ž„์—๋„ ๋Œ€๋ถ€๋ถ„์˜ ๊ธฐ๋Šฅ์„ ๊ฐ–์ถ”๊ณ  ์žˆ๊ณ  ๋น„์šฉ์ด ๋“ค์ง€ ์•Š๋Š”๋‹ค๋Š” ์ ์—์„œ ๋งŽ์ด ์‚ฌ์šฉํ•˜๊ณ  ์žˆ๋‹ค. R ๊ณผ R์ŠคํŠœ๋””์˜ค ๋‹ค์šด๋กœ๋“œ! R์„ ์‚ฌ์šฉํ•˜๊ณ  ์ตํžˆ๊ธฐ ์œ„ํ•ด์„œ๋Š” PC์— R๊ณผ R์ŠคํŠœ๋””์˜ค๊ฐ€ ์„ค์น˜๋˜์–ด ์žˆ์–ด์•ผ ํ•œ๋‹ค. โ€ปR์ŠคํŠœ๋””์˜ค๋ฅผ ์‚ฌ์šฉํ•˜๋ ค๋ฉด R์ด ๋จผ์ € ๋‹ค์šด๋˜์–ด ์žˆ์–ด์•ผํ•œ๋‹ค R..

R 2019.03.19