Stars plot을 이용한 다변량 데이터의 시각화
> total<-read.table('성적.csv',header=T,sep=',')
> total
이름 국어 영어 수학 국사 화학 물리
1 박지영 90 85 55 88 91 79
2 김태함 70 65 80 75 76 89
3 김효섭 92 95 76 65 89 91
4 임경희 76 89 88 95 100 91
5 권혁진 97 87 83 91 86 91
6 하혜진 80 86 97 85 69 77
7 이준원 80 30 40 50 70 90
8 윤정웅 70 82 54 56 58 60
9 주시현 90 95 100 85 89 92
> row.names(total)<-total$이름 #학생 별로 성적을 불러오기 위한 작업
> total
이름 국어 영어 수학 국사 화학 물리
박지영 박지영 90 85 55 88 91 79
김태함 김태함 70 65 80 75 76 89
김효섭 김효섭 92 95 76 65 89 91
임경희 임경희 76 89 88 95 100 91
권혁진 권혁진 97 87 83 91 86 91
하혜진 하혜진 80 86 97 85 69 77
이준원 이준원 80 30 40 50 70 90
윤정웅 윤정웅 70 82 54 56 58 60
주시현 주시현 90 95 100 85 89 92
> total<-total[,2:7]
> total
국어 영어 수학 국사 화학 물리
박지영 90 85 55 88 91 79
김태함 70 65 80 75 76 89
김효섭 92 95 76 65 89 91
임경희 76 89 88 95 100 91
권혁진 97 87 83 91 86 91
하혜진 80 86 97 85 69 77
이준원 80 30 40 50 70 90
윤정웅 70 82 54 56 58 60
주시현 90 95 100 85 89 92
그래프 그리기
> stars(total,flip.labels = FALSE, draw.segments = FALSE, frameplot=TRUE, full=TRUE, main='성적 분석-Star Chart')
> stars(total,flip.labels = FALSE, draw.segments = TRUE, frameplot=TRUE, full=TRUE, main='성적 분석-Nightingale Chart')
> stars(total,flip.labels = FALSE, draw.segments = TRUE, frameplot=TRUE, full=FALSE, main='성적 분석-Nightingale Chart')
> stars(total,flip.labels = FALSE, draw.segments = TRUE, frameplot=TRUE, full=FALSE, main='성적 분석-Nightingale Chart',scale=T,key.loc=c(10,2))
'Python, R 분석과 프로그래밍' 카테고리의 다른 글
| [R vs Python] 무엇이 더 좋을까? Chat GPT에게 물어보다 (0) | 2023.08.03 |
|---|---|
| [독립표본 두 모평균 비교] 제품A와 B간 품질 차이 비교 (0) | 2016.09.02 |
| R 회귀분석 (0) | 2016.02.28 |
| [미완성] 중국 sohu 크롤링 연습 (0) | 2016.02.20 |
| beer data 연습 (0) | 2015.11.10 |
