R studio 파이차트 간략하게 만들기

0
답변 1 R studio 파이차트 간략하게 만들기 답변 1 (/p/r)
distribute = table(boxoffice$배급사) order_dist = order(distribute, decreasing = T) freq_dist = distribute[order_dist] pie(freq_dist, labels = lab..

distribute = table(boxoffice$배급사)
order_dist = order(distribute, decreasing = T)
freq_dist = distribute[order_dist]
pie(freq_dist, labels = label)
pct = round(freq_dist/sum(freq_dist)*100,1)
label=paste0(names(freq_dist),"\n", pct, "%")

박스오피스를 보고 이와 같은 파이차트를 만들었습니다.

여기서 상위4개를 top4로 합치고 나머지를 묶고 싶은데 어떡해 해야하나요?

파이차트 R
1개월 전 지슬
+
지슬 님께서 1개월 전에 R에 올린 질문
댓글 쓰기

1개의 답변

0
[답변]R studio 파이차트 간략하게 만들기 (/p/r)
조건에 따라 그룹으로 묶으시면 될 것 같습니다. 아래 샘플 코드를 참고해보시기 바랍니다. # 샘플 데이터 df=data.frame(id=paste('R',seq(1,5),sep=''),val..

조건에 따라 그룹으로 묶으시면 될 것 같습니다.

아래 샘플 코드를 참고해보시기 바랍니다.

# 샘플 데이터
df=data.frame(id=paste('R',seq(1,5),sep=''),value=as.numeric(c('45','25','77','0','100')))

# 조건에 따른 그룹 만들기
grp1=subset(df,value<26)
grp2=subset(subset(df,value>26),value<=46)
grp3=subset(subset(df,value>26),value<=80)
grp4=subset(subset(df,value>80),value<=100)

# 퍼센티지 계산
slice<-c(length(grp1[,1])/length(df[,1]),length(grp2[,1])/length(df[,1]),length(grp3[,1])/length(df[,1]),length(grp4[,1])/length(df[,1]))*100

# 파이차트 만들기
pie(slice,labels=paste(slice,'%',sep=''),main="My pie chart")

 

위 샘플 코드의 결과는 아래와 같이 출력됩니다.

1개월 전 kimho
+
kimho 님께서 1개월 전에 R에 올린 글
사탕 주기
보관하기
댓글 쓰기
조회수 611
답글 1
URL