R语言echarts4r包:绘制优雅动态图

突然看到期待已久的echarts4r包0.3.2版上线cran了,值得写点内容,顺便温习下用法。

echarts4是百度开源项目,是一款简单实用、图表优美的js动态图表可视化包。

R语言中的echarts4移植包有许多,echarts4r应该是目前移植效果最全面的了。同样是用***htmlwidgets***包作为中介移植。

作者github上还有阿里的G2项目移植,也是一个非常不错的可视化包

安装

install.packages("echarts4r")

使用

library(echarts4r)

特性

• echarts4r包通过e_charts()初始化数据
• 支持%>%管道函数
• 图形类型均以e_为前缀,基本支持echarts所有图形。常见的折线图、面积图、饼状图、散点图、雷达图、日历图、热力图等。
• 可以绘制地图,支持3D地图。
• 可以在shiny内使用

快速开始

先画个折现图试一试效果

library(echarts4r)
library(tidyverse)
df <- mtcars %>% 
    rownames_to_column('model')
df %>% e_charts(x = model) %>% 
    e_line(serie = mpg)

e_charts作为初始化函数,这里model作为x轴标签。eline函数将mpg值数据传入。

可以非常方便的叠加其他图形

df %>% e_charts(x = model) %>% 
    e_line(serie = mpg) %>% 
    e_area(drat)

可以添加标题、轴标签等

df %>% e_charts(x = model) %>% 
    e_line(serie = mpg) %>% 
    e_area(drat) %>% 
    e_title("the mpg of model")

内置多种主题

df %>% e_charts(x = model) %>% 
    e_line(serie = mpg) %>% 
    e_area(drat) %>% 
    e_title("the mpg of model") %>% 
    e_theme("cool")

支持dplyr包分组函数

iris %>% 
    group_by(Species) %>% 
    e_charts(Sepal.Length) %>% 
    e_line(Sepal.Width) %>% 
    e_title("Grouped data")

支持标记点、线

df %>% e_charts(x = model) %>% 
    e_line(serie = mpg) %>% 
    e_mark_line("mpg",data = list(type = "average"))

显示标签

df %>% e_charts(x = model) %>% 
    e_line(serie = mpg) %>% 
    e_labels()

其他还有许多,一文难尽。

---