library(ggplot2)
library(ggforce)
dat = read.table(text=
" x y sizes
1 -1.75 0.25
1 -1.5 0.5
1 -1 1
1 -0.5 1.5
1 -0.7 1.3
1 -0.8 1.2
1 0 2", header=TRUE)
################################absolute value = 2
dat
## x y sizes
## 1 1 -1.75 0.25
## 2 1 -1.50 0.50
## 3 1 -1.00 1.00
## 4 1 -0.50 1.50
## 5 1 -0.70 1.30
## 6 1 -0.80 1.20
## 7 1 0.00 2.00
ggplot(dat, aes(x0=x, y0=y, r=sizes)) +
geom_circle() + coord_equal() + theme_classic()