Как сохранить разные группы данных в одной и той же координате?

Question

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

Мой вопрос: когда данные становятся больше, координата и данные адаптируются автоматически, я хочу, чтобы все данные имели одно и то же значение MAX для всех графиков и имели одинаковую длину координаты. Другими словами, я хочу, чтобы все графики отображали размер графика в одном стандарте.

Вот мой код:

library(ggplot2)

data<-read.csv("data4line01292017-Average.csv",head=TRUE,sep=",")

cols<-c("green","blue","red")

p<-ggplot(data, aes(x=data$Range,y=data$Counts,fill=data$Length)) +
 geom_bar(width = 30, colour="black",stat="identity") +
 scale_y_discrete(drop = FALSE) +
 theme(legend.box.just = "top",legend.position = "bottom"
    ) +
 labs(title = "Distribution of A by length and directions",
    fill = "Length range(um)",
    y = "A counts", limits = c(0, 100),
    colour = "Cylinders") +
 ##coord_flip() +
 coord_polar(theta = "x", start=-pi/2, direction=-1) +
 scale_x_continuous("",  breaks = c(0,90,180,270), labels = c(0,90,180,270))

p

Вот одна группа данных:

Range   Length  Counts
15  0-15um  2.428571429
45  0-15um  0
75  0-15um  0.714285714
105 0-15um  0.428571429
135 0-15um  0
165 0-15um  0.142857143
195 0-15um  0.142857143
225 0-15um  0.428571429
255 0-15um  0.428571429
285 0-15um  0.571428571
315 0-15um  0
345 0-15um  2.857142857
15  15-30um 3
45  15-30um 0
75  15-30um 0
105 15-30um 0
135 15-30um 0
165 15-30um 0
195 15-30um 0
225 15-30um 0
255 15-30um 0
285 15-30um 0
315 15-30um 0.142857143
345 15-30um 2.571428571
15  >30um   0.285714286
45  >30um   0
75  >30um   0
105 >30um   0
135 >30um   0
165 >30um   0
195 >30um   0
225 >30um   0
255 >30um   0
285 >30um   0
315 >30um   0
345 >30um   0

Это сюжет розы, который я получил: График сюжета розы из приведенных выше данных

Если я использую другую группу данных:

Range   Length  Counts
15  0-15um  3.428571429
45  0-15um  0
75  0-15um  0.714285714
105 0-15um  0.428571429
135 0-15um  0
165 0-15um  1.142857143
195 0-15um  1.142857143
225 0-15um  1.428571429
255 0-15um  1.428571429
285 0-15um  1.571428571
315 0-15um  0
345 0-15um  3.857142857
15  15-30um 4
45  15-30um 0
75  15-30um 0
105 15-30um 0
135 15-30um 0
165 15-30um 0
195 15-30um 0
225 15-30um 0
255 15-30um 0
285 15-30um 0
315 15-30um 1.142857143
345 15-30um 3.571428571
15  >30um   1.285714286
45  >30um   0
75  >30um   0
105 >30um   0
135 >30um   0
165 >30um   0
195 >30um   0
225 >30um   0
255 >30um   0
285 >30um   0
315 >30um   0
345 >30um   0

Это вторая роза картина сверху данных

Очевидно, что график розы выглядит одинаково, но значение фактических данных совершенно другое, разрыв между ними равен 1, я хочу, чтобы все эти графики могли быть сопоставимы, если бы я помещал их рядом и не хотел показывать метка координат, просто хочу, чтобы на графике розы отображался соответствующий размер на основе фактического значения. Какой параметр я должен добавить в скрипт?