根据ECharts2Shiny包绘制饼图。
示例
library(shiny)
library(ECharts2Shiny)
# 准备绘图的样本数据
dat<-c(rep("Type-A",8),
rep("Type-B",5),
rep("Type-C",5))
# UI
ui<-fluidPage(
# 必须先加载Echarts脚本
loadEChartsLibrary(),
tags$div(id="test",style="width:50%;height:400px;"),
deliverChart(div_id="test")
)
# server
server<-function(input,output){
# 调用ECharts2Shiny的函数以渲染图表
renderPieChart(div_id="test",data=dat)
}
# 运行
shinyApp(ui = ui, server = server)
渲染属性
renderPieChart(div_ id, data,
theme ='default',radius, center_x, center_y,
show.label = TRUE,
show.legend = TRUE, show.tools = TRUE ,
font.size.legend= 12,
animation = TRUE,
hyperlinks = NULL,
running_ in_ shiny)
结果:
理论:
- div_id:为此图表指定的部门id用户。划分将在用户界面。
- data: 用于绘图的数据。它应该是矢量或数据帧。如果它是一个向量,它应该由所有你想计算的元素组成绘图,如c(“a”,“a”,“b”,“a”,“b”,“c”)。
如果是data.frame,则数据只能由两列组成,“name”和“value”。“value”列必须是数字或整数。 - theme: 常用的主题,有效值包括:“default”, “roma”, “info-graphic”, “macarons”, “vintage”, “shine”, “caravan”, “dark-digerati”, “jazz”, 和 “london”。
- radius: 饼图的半径。默认值为“75%”。
- center_x:饼图(X轴)的中心的位置。默认值为“50%”。
- center_y:饼图(Y轴)的中心的位置。默认值为“50%”。
- show.lable: 是否显示饼图的标签。默认值是true。
- show.legend:是否显示图例。默认值是true。
- show.tools:是否显示工具栏。默认值是true。
- font.size.legend:图例栏的字体大小。默认值为12
- animation:是否与动画显示图表。默认值是true
- hyperlinks: 超链接,矢量。用户可以将图表中的每个元素链接到超链接(像http://***.com这样的URL)。请注意,只有在数据处于数据中的数据中仅支持 data.frame格式,"hyperlinks"向量的长度应与给定数据中的行数相同。
请注意,如果可用的超链接,弹出窗口中的字体将处于SkyBlue颜色和斜体样式。 - running_in_shiny:如果我们在闪亮的库中实际运行它,或者我们只需进行测试。默认valus是“true”。如果“假”,则该函数将打印它应该评估的内容。
注意:
- 用户需要首先陈述图表的划分,并具有shiny的包的标签$ div()函数。请注意,该部门ID必须保持唯一(重复的部门ID会导致错误)。