У меня есть данные из двух столбцов, как показано ниже, из которых мне действительно необходимо создать столбчатую диаграмму полярности (полярный график четверть круга от нуля до 90 градусов).
Angle Frequency
0-10 83.3
10_20 16.6
20_30 5.7
30_40 62.3
40_50 32.4
Я попытался использовать ggplot2
, как показано ниже, но это создает круг на 360 градусов. Я не мог найти, как сделать это четверть круга (не круг 360 градусов).
d <- structure(list(Angle = c(10, 20, 30, 40, 50),
Frequency = c(83.3, 16.6, 5.7, 62.3, 32.4)), .Names = c("Angle", "Frequency"),
row.names = c(NA, 5L), class = "data.frame")
library("ggplot2")
ggplot(d, aes(x = Angle, y = Frequency)) +
coord_polar(theta = "x", start = -pi/36, direction = 1) +
geom_bar(stat = "identity") +
scale_x_continuous(limits=c(0,90), breaks = seq(0, 90, 10))
Я также попытался использовать plotly
, как показано ниже:
library("plotly")
p <- plot_ly(
type = 'barpolar',
r = c(54.7, 32.6, 8.4, 10.4, 30.6),
theta = c(0, 10, 20, 30, 40)) %>%
layout(
polar = list(
radialaxis = list(
visible = T,
range = c(0,60)
),
sector = c(0,90),
radialaxis = list(
tickfont = list(
size = 10
)
),
angularaxis = list(
tickfont = list(
size = 10
)
)
)
)
Однако я Нужно изменить некоторые особенности созданной гистограммы с помощью plotly
, и я не смог найти, как их изменить.
Вот мои вопросы:
Для фигуры, сделанной с использованием ggplot2
: как я могу сделать четверть круга (а не полный круг с 360 градусами)?
Для рисунка, сделанного с использованием plotly
:
1) Как изменить интервал корзин? В моей текущей диаграмме углы разделены на 15 градусов: 0, 15, 30, 45, 60, 75 и 90 градусов. Мне нужно изменить этот интервал на 10 и сделать деления 0, 10, 20, 30, 40, 50, 60, 70, 80 и 90. Как я могу это сделать?
2) Как я могу изменить цвет полос? Теперь все пять полос синего цвета, но я хочу изменить синий цвет, например, на черный, красный или любой другой.
Я был бы очень признателен за вашу большую и ценную помощь. Большое спасибо.