{r setup, include=FALSE} knitr::opts_chunk$set(eval = FALSE) * R语言数据可视化—交互式图表recharts包
{r eval=F} if (!require(devtools)) library(devtools) # install_github("madlogos/recharts") library(recharts)
if (!require(devtools)) library(devtools) 表示 如果没有library这个包,那么就library它, 很废的一个命令。
dashboard构建。
{r eval=F} # 构造一个数据集: data = data.frame(x=rep(c('KR/min', 'Kph'), 2), y=c(3.3, 56, 9.5, 88), z=c(rep('t1', 2), rep('t2', 2))) knitr::kable(data)
这里 x自变量, y因变量。 type='gauge')表示要画dashboard。 facet很好理解,类似于ggplot的概念。 t时间轴。
{r eval=F} echartr(data, x, y, type='gauge') # 多个dashboard: echartr(data, x, y, facet=x, type='gauge') # 带时间轴: echartr(data, x, y, facet=x, t=z, type='gauge')