R语言画交互式图

主要使用的包为scatterD3，其github的链接地址为：https://github.com/juba/scatterD3。

scatterD3包可以实现交互式画图，画完图后可以做图进行缩放查看。
安装方式为：
install.packages(“scatterD3”) 或者为
devtools::install_github(“juba/scatterD3”)

library(scatterD3)
scatterD3(x = mtcars$wt, y = mtcars$mpg) #生成的图可以缩放   

scatterD3(data = mtcars, x = wt, y = mpg, 
          point_size = 175,               #表示点的大小
          point_opacity = 0.3,            #表示点的透明度
          fixed = TRUE,
          colors = "#000")

scatterD3(data = mtcars, x = wt, y = mpg, 
          point_size = 100,               #表示点的大小
          point_opacity = 0.3,            #表示点的透明度
          fixed = TRUE,
          hover_size = 6,                 #表示鼠标放上去之后点的放大倍数
          hover_opacity = 2,          
          colors = "#000")

可以随意改变x轴的名字

mtcars$cyl_fac <- paste(mtcars$cyl,"willnight")
scatterD3(data = mtcars, x = cyl_fac, 
          y = mpg,point_size=60,hover_size = 4)

给点赋予文字标签

mtcars$names <- rownames(mtcars)
scatterD3(data = mtcars, x = wt, y = mpg, 
          lab = names, labels_size = 15,
          point_size=60,hover_size = 4)

利用颜色形状处理分类变量

scatterD3(data = mtcars, x = wt, y = mpg, 
        col_var = cyl,      #表示颜色标签 
        symbol_var = gear   #形状类型
        )

此外使用DiagrammeR包可以话流程图，当然也可以画树，

DiagrammeR("
sequenceDiagram;
customer->>web:ask Api;
web->>customer:有token么;
customer->>web:token给你;
web->>database:这个用户token匹配么;
alt 如果匹配
database->>web: 匹配的;
web->>database:拿数据;
database->>web:数据给你;
web->>customer:数据给你;
else 不匹配
database->>web:不匹配;
web->>customer:error;
end
           ")

输出结果为：

原文链接地址为：点击这里