Круговой график в ggplot2 с отрезками, соединенными в r

Я пытаюсь создать круговой график и застрял в точке:

dat1 <- data.frame (xvar = 1:10, y = 6, ymin = 4, ymax = 4.5)

Используя эти данные, я могу создать круговой ленточный график в ggplot2

require(ggplot2) 
 ggplot(dat1, aes(x=xvar, y=y)) +  geom_ribbon(aes(ymin=ymin, ymax=ymax),
  col = "blue", fill = "blue2") + ylim (c(0,6)) + coord_polar()

. Однако я хочу большего.

Я хочу заполнить сегмент ленты разными цветами и метками, используя следующие данные.

 filld <- data.frame (start = c(1, 4, 6, 7.5, 8, 9), end = c(4, 6, 7.5, 8, 9, 10),
                         label = c("A", "B", "C", "A", "C", "D"))
  filld
##    start  end label
## 1   1.0  4.0     A
## 2   4.0  6.0     B
## 3   6.0  7.5     C
## 4   7.5  8.0     A
## 5   8.0  9.0     C
## 6   9.0 10.0     D

Лента будет заполнена другим цветом в зависимости от переменной метки. Например, сегмент А будет начинаться с 1 и заканчиваться на 4.Затем сегмент B будет начинаться и заканчиваться на 6 и заполняться другим цветом. Сегменты с одинаковой меткой (, такие как A и C ), будут соединены линией.

Результирующий график будет выглядеть так: