R그래프(R차트) – 흑곰의 유익한 블로그 2호점

R그래프(R차트)

0. c:\image\score.txt

no name kor eng math
1 홍길동 67 89 50
2 심청이 80 99 55
3 춘향이 90 80 70
4 이순신 78 59 80
5 박문수 56 89 90
6 강감찬 87 65 67
7 을지문덕 57 79 50
8 김유신 36 58 40
9 유관순 76 60 52
10 이성계 92 100 80

메모장에서 UTF-8 로 저장하면 된다.

1. 테이블 가져오기

score<-read.table(“c:/image/score.txt”,header=TRUE)

2. 테이블에서 kor 칼럼만 가져오기
i<-score$kor
i

3. 파이차트 그리기(PIE)

pie(score$kor)

pie(score$kor,labels=paste(score$name,”\n”,score$kor),col=rainbow(10))

3-1. 파이차트 자바소스
public static void main(String[] args) {
  // TODO Auto-generated method stub
  try{
   RConnection rc=new RConnection();
   rc.voidEval(“score<-read.table(‘c:/image/score.txt’,header=TRUE)”);
   rc.voidEval(“png(‘c:/image/score3.png’)”);
   rc.voidEval(“pie(score$kor,labels=paste(score$name,’\n’,score$kor),col=rainbow(10))”);
   rc.voidEval(“dev.off()”);
   rc.close();
   System.out.println(“완료”);

  }catch(Exception ex){ex.getMessage();}
}

4. R에서 plotrix 설치하기

install.packages(“plotrix”)

5. plotrix : 바 플롯(barplot)

barplot(score$eng,col=rainbow(10))

6. plotrix : fan.plot(팬 플롯)

  try{
   RConnection rc=new RConnection();
   rc.voidEval(“library(plotrix)”);
   rc.voidEval(“score<-read.table(‘c:/image/score.txt’,header=TRUE)”);
   rc.voidEval(“png(‘c:/image/score6.png’)”);
   rc.voidEval(“fan.plot(score$eng,labels=paste(score$name,’\n’,score$eng),col=rainbow(10),align=’left’,max.span=pi)”);
   rc.voidEval(“dev.off()”);
   rc.close();
   System.out.println(“완료”);

  }catch(Exception ex){ex.getMessage();}
}

7. plotrix : pie3D
rc.voidEval(“library(plotrix)”);
rc.voidEval(“pie3D(score$eng,labels=paste(score$name,’\n’,score$eng),explode=0.3,radius=pi/5)”);