버블 차트의 큰 버블 뒤에 숨겨진 버블이 없습니다.

Question

버블 차트를 사용하여 데이터를 시각적으로 표시하고 있습니다. 내가 직면하고 문제는 더 작은 영역에 거품이 R.에서 버블 차트에 더 큰 거품 뒤에 숨겨진입니다

V1 V2       V3  V4 
fl unfair business practices 14  Y 
fl Corrections     1  Y 
fl Product differs    1  Y 
fl refund not paid    0  Y 
fl Single premium    0  Y 
fl unfair business practices 52  N 
fl Corrections     63  N 
fl Product differs    9  N 
fl refund not paid    2  N 
fl Single premium    2  N 
mc unfair business practices 19  Y 
mc Corrections     0  Y 
mc Single premium    0  Y 
mc unfair business practices 36  N 
mc Corrections     2  N 
mc Single premium    2  N 

symbols(dat1$V2, dat1$V1, circles=dat1$V3) 
radius <- sqrt(dat1$V3/ pi) 
symbols(dat1$V2, dat1$V1, circles=radius, inches = 0.35, fg = "dark blue", bg = "red", xlab = "CASE REASON", ylab = "WORDS") 

내 문제는 (말) V1 = "FL"과 V2 = "불공정 거래 관행"입니다 내 데이터에 두 번 나타납니다, 나는 2 거품을 음모를 꾸미고 있지만, 작은 거품은 큰 거품 뒤에 숨어 있습니다. 작은 그림을 내 플롯에 표시하고 싶습니다.

또한 거품의 색을 나타 내기 위해 V4 열을 사용하고 싶습니다. 예 : V4 = "Y"인 경우 거품이 빨강이되고 싶습니다. 그렇지 않으면 녹색으로 바꿉니다.

도움을 주시면 감사하겠습니다. 감사

Answer 1

작은 원이 data.frame의 끝에서되도록 당신이 당신의 데이터를 정렬하는 경우 :

dat1 <- dat1[order(dat1$V3, decreasing=TRUE),] 

(그리고 새 DAT1에 반경을 계산 확인 - 또는 circles = dat1$V3/pi로 circles=radius 교체) 작은 원의 집합이 하나의 큰 원을 완전히 가린다면 모든 데이터를 볼 수 없게됩니다!)

fg와 bg 상수를 기호는 예를 들어 bg=ifelse(dat$V4=="Y", "red", "green")