Pie Chart R programming

Question

Create a pie chart for the top 6 entries of the mtcars dataset. Plot the mpg values against the row names(labels) of the dataset. I tried with this code but may be I am not able to understand the question correctly as in katacoda environment I am not able to move forward.
Code:

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

Answer 1

This has nothing to do with table , which would count the number of equal values, the variable mpg is continuous.
The question asks to plot the top 6 values of mpg against row.names(mtcars) .

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

Answer 2

Maybe highcharter?

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

Answer 3

Slightly odd plot (I'm not sure I fully understand what you're going for), but you should be able to adapt this

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")

Although I far prefer this as a bar chart. I think its much more interpretable

ggplot(mtcars_sub) +
  geom_col(aes(y = mpg, x = names, fill = names))

Answer 4

Try these set of commands

data(mtcars)
pie(table(mtcars$mpg[1:6]),labels=row.names(mtcars)[1:6])

Answer 5

data(mtcars)
count <- table(mtcars$mpg[1:6])
pie(count, labels = row.names(mtcars)[1:6])