포지셔닝 맵 도출 과정

포지셔닝 맵 도출은 다음과 같은 과정을 거친다. 
주요 코드만 기재 
 

• 데이터 불러오기 : 먼저 데이터셋을 불러온다 

MCR2015 <- read_sav("~/[0] Temp/MCR2015.SAV")
 

• 데이터 전처리 

MCR2015 <- subset(MCR2015_1, MCR2015_1$Q1434 == 1) 
+ 첫번째 고려요소 더미변수화 , 두번째 고려요소 더미변수화 
 

• 데이터 구조분석 -->요인점수 저장

result.fac2 <- principal(f.data, 4, rotate="varimax", scores=TRUE,method="regression")
 

• 군집 분석 --> 군집 값 저장

k <- kmeans(c.data, 5)
 

• 요인점수와 군집 값 --> 판별 분석

ld <- lda(CLUST ~ FACA + FACB + FACC + FACD, data = d.data)
 

• 영역도 산출

terr.map <- ggplot(t.data, aes(x=DISC1, y=DISC2))
 

• 포지셔닝 맵 도출 

position.map <- ggplot(m.data, aes(x=DISC1, y=DISC2))