coloring rectnagles

[agolicz]

Hi,
I am trying to plot mutations from multiple individuals on the same track of circular plot.
I have GRanges object that looks like this:
GRanges object with 26 ranges and 4 metadata columns:
seqnames ranges strand | id var val buu
|
[1] 1 [32417, 32427] * | jcf7180000862659 A 1 32417
[2] 1 [58621, 58631] * | jcf7180000753913 B 1 58621
[3] 2 [25622, 25632] * | jcf7180000860774 C 1 25622
[4] 2 [44180, 44190] * | jcf7180001643718 D 1 44180
[5] 2 [66003, 66013] * | jcf7180001638671 E 1 66003

I would like to color mutations by var. I am able to plot them as points but not as rect.
cols <- RColorBrewer::brewer.pal(6,"Paired")
names(cols) <- c("A,"B","C","D", "E", "F")
p <- p + circle(lost, geom = "point", aes(fill=var, colour=var, shape=0)) + scale_color_manual(values = cols) + scale_fill_manual(values = cols) + scale_shape_identity()

That works for goem point, but I would like geom rect. If I change geom to rect and do aes(fill=var, colour=var​) all lines are black.