R - 회귀분석 예제

---

이번에 배울 것은 회귀 분석 예제입니다.

회귀 분석은 기존 통계 분석을 결과로 어떠한 현상의 경향성을 추측하는 분석입니다. 회귀 분석을 통해 100% 까진 아니더라도 현실을 설명하고 미래를 간략하게 나마 예측할 수 있습니다.

---

코드

#회귀분석 : 어떤 값을 기준으로 다른 결과값을 예측

#단순회귀 : 일변수 일차방정식

#판매량y = 30 + 10 * (판촉행사횟수)

#y=b0 + b1*x

#최소자승법을 이용해 b1(기울기)를 구할 수 있다.

#기울기를 이용해 b0(절편을 구할 수 있다.

#부모의 IQ : 110,120,130,140,150

#자녀의 IQ : 100,105,128,115,142

x <- c(110,120,130,140,150)

y <- c(100,105,128,115,142)

mean(x)

mean(y)

x - mean(x)

y - mean(y)

(x - mean(x)) ** 2

#b1 을 구할 수 있다  0.94

y = b0 + b1x

b0 = y - b1x

118 - 0.75 * 130

b0 = 118 - 0.94 * 130  #==> -4.2

y = -4.2 + 0.94 * 145

y

#R을 이용한 단순회귀분석

x <- c(110,120,130,140,150)

y <- c(100,105,128,115,142)

cor(x,y)  #r:0.8660744 양의 상관

plot(x,y)

help(lm)

line <- lm(y ~ x)

line

abline(line, col='blue')

#y = -4.2 + 0.94 * x

df <- data.frame(workhour=1:7,

                 totalpay=seq(10000, 70000, by=10000))

df

plot(totalpay ~ workhour, data=df, col='red', pch=20)

abc <- lm(totalpay ~ workhour, data=df)

abc

grid()

abline(abc, col="blue", lwd = 1)

plot(abc, which=c(4, 6))

샘플 데이터

실습34_회귀분석.R

---

본 포스팅은 KIC 캠퍼스에서 박영권 강사의 지도하에 공부하며 작성한 리포트입니다.

혹시 잘못된 내용이 있거나 문제 소지시 댓글 남겨주시면 조치하겠습니다.

---

저작자표시비영리변경금지

'02_Big Data' 카테고리의 다른 글

R - 다중 회귀분석 예제  (0)	2018.04.30
R - 단순회귀 분석 예제  (0)	2018.04.30
R - 회귀분석 조건 예제  (0)	2018.04.30
R - 회귀분석 예제  (0)	2018.04.30
R - 요인분석 예제  (0)	2018.04.30
R - 상관계수 분석 예제  (0)	2018.04.30
R - 아노바 분석 예제  (0)	2018.04.23