Как сделать четверть кругового полярного участка в R? - PullRequest
1 голос
/ 09 января 2020

У меня есть данные из двух столбцов, как показано ниже, из которых мне действительно необходимо создать столбчатую диаграмму полярности (полярный график четверть круга от нуля до 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) Как я могу изменить цвет полос? Теперь все пять полос синего цвета, но я хочу изменить синий цвет, например, на черный, красный или любой другой.

Я был бы очень признателен за вашу большую и ценную помощь. Большое спасибо.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...