改名为";“切片”;在饼图中使用Highcharts

改名为";“切片”;在饼图中使用Highcharts,r,highcharts,shiny,R,Highcharts,Shiny,使用下面的代码在Shining R界面中使用Highcharts制作饼图,但无法命名切片。我使用了应用程序文件夹中以csv格式存储的数据集 output$Hist<-renderHighchart({ data<-read.csv(paste0(getwd(),"/data.csv"),header=TRUE,stringsAsFactors=FALSE) highchart() %>% hc_chart(type =

使用下面的代码在Shining R界面中使用Highcharts制作饼图,但无法命名切片。我使用了应用程序文件夹中以csv格式存储的数据集

  output$Hist<-renderHighchart({

        data<-read.csv(paste0(getwd(),"/data.csv"),header=TRUE,stringsAsFactors=FALSE)
        highchart() %>%
          hc_chart(type = "pie") %>% 
          hc_plotOptions(
            series = list(showInLegend = TRUE)
          ) %>% 
          hc_add_series(data =  data$Count, name = data$X) %>%
    hc_tooltip(valueDecimals = 0,
                     pointFormat = "Count: {point.y}") %>%
 hc_legend(enabled = TRUE)%>%
输出$Hist%
hc\u绘图选项(
系列=列表(showInLegend=TRUE)
) %>% 
hc_添加_系列(数据=数据$Count,名称=数据$X)%>%
hc_工具提示(数值小数=0,
pointFormat=“Count:{point.y}”)%%>%
hc_图例(启用=真)%>%
图表图像:

像这样:

library(highcharter)
data <- data.frame(X=c("name1","name2"),Count =c(20,30))
highchart() %>%
hc_add_series_labels_values(data$X, data$Count, name = "Pie",colorByPoint = TRUE, type = "pie")
库(highcharter)
数据%
hc_添加_系列_标签_值(数据$X,数据$Count,name=“Pie”,colorByPoint=TRUE,type=“Pie”)

请提供样本数据