R语言taiyun的recharts包非常强大,但原生的echarts有些图表未做进去,我们又想用,可以自定义扩展,该包预留了扩展接口,可谓非常贴心了。仪表盘可以用下列函数添加:
opt = list(
series = list(list(
name = 'Sales',
type = 'gauge',
data = c(70,'ceshi')
))
)
htmlwidgets::createWidget('echarts', opt, package = 'recharts')
另一种方式:自定义函数
yb<-function(x,min,max){
library('recharts')
opt = list(
series = list(list(
min=min,
max=max,
name = 'Sales',
type = 'gauge',
data=x
))
)
htmlwidgets::createWidget('echarts', opt, package = 'recharts')}