Программирование P ie Chart R - PullRequest
0 голосов
/ 10 марта 2020

Создать диаграмму ap ie для 6 верхних записей набора данных mtcars. Нанесите значения mpg на имена строк (метки) набора данных. Я пытался использовать этот код, но, возможно, я не могу правильно понять вопрос, так как в среде katacoda я не могу двигаться вперед.
Код:

count = table(mtcars$mpg[1:6])
pie(count)

enter image description here

Ответы [ 4 ]

1 голос
/ 10 марта 2020

Может быть, Highcharter?

highchart() %>% 
hc_add_series(data=cbind(name=rownames(mtcars),mtcars)[1:6,],
type="pie",hcaes(name=name,y=mpg))

enter image description here

1 голос
/ 10 марта 2020

Это не имеет ничего общего с table, который считает количество равных значений, переменная mpg является непрерывной.
Вопрос просит построить верхнюю 6 значения из mpg против row.names(mtcars).

x <- setNames(mtcars$mpg[1:6], row.names(mtcars)[1:6])
pie(x)

enter image description here

0 голосов
/ 22 апреля 2020

Попробуйте этот набор команд

data(mtcars)
pie(table(mtcars$mpg[1:6]),labels=row.names(mtcars)[1:6])
0 голосов
/ 10 марта 2020

Немного странный график (я не уверен, что полностью понимаю, к чему вы стремитесь), но вы должны быть в состоянии адаптировать это

library(ggplot2)
library(ggforce)

mtcars_sub <- head(mtcars, 6)
mtcars_sub$names <- rownames(mtcars_sub)

ggplot(mtcars_sub) +
  geom_arc_bar(aes(x0 = 0, y0 = 0, r0 = 0, r = 1, amount = mpg, fill = names), stat = "pie")

Хотя я предпочитаю это как гистограмму. Я думаю, что это гораздо более интерпретируемым

ggplot(mtcars_sub) +
  geom_col(aes(y = mpg, x = names, fill = names))
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...