作者:鲁伟,热爱数据,坚信数据技术和代码改变世界。R语言和Python的忠实拥趸,为成为一名未来的数据科学家而奋斗终生。个人公众号:数据科学家养成记 (微信ID:louwill12)
今天小编要给大家介绍的是如何在 R 语言中绘制漂亮的雷达图,说到这雷达图,大家可能并不陌生,咱们的 excel 中就有非常方便的雷达图画法。雷达图又叫戴布拉图、蜘蛛网图,通常在财务报表分析中使用较多。但在描述性统计分析中,雷达图正在被越来越多的人使用。
在 R 语言中,我们可以通过 ggplot2 的一款扩展主题包——ggradar 来绘制出简单漂亮的雷达图。话不多说,小编直接上代码,争取让大伙儿一分钟学会用 R 语言绘制雷达图。
ggradar包的安装
devtools::install_github("ricardo-bion/ggradar", dependencies=TRUE)
照例 ggplot2 这类扩展主题包是需要通过 github 来安装的。
绘图:以 mtcars 数据集为例
#加载相关扩展包
library(ggradar) suppressPackageStartupMessages(library(dplyr))library(scales)
#利用dplyr管道操作符重组绘图对象mtcars%>% rownames_to_column(var = "group" )%>% mutate_each(funs(rescale), -group)%>% tail(4)%>% select(1:10) -> mtcars_radar
#ggradar函数绘制雷达图ggradar(mtcars_radar)
绘制出的雷达图效果如下:
雷达图上四款车型在八个汽车指标上的表现一目了然,ggradar 也会自动选择一些美观的配色来使得图形更为直观。
还可以使用 knitr 包中的 kable 函数将雷达图数据对象进行 markdown 展示:
knitr::kable(mtcars_radar,format="markdown")
最后小编再展示一个数据科学家必备能力的雷达图:
setwd("F:/R/Rcode")dataindex <- read.csv("datascience.csv")dataindex%>% mutate_each(funs(rescale),-name)->data_radarggradar(data_radar)
如果你的数据科学技能绘制出来后能像黄色的那条那样形成一个正五边形,那你真正的数据科学家当之无愧。小编不禁抬头看了看,觉得前路漫漫,好在我们正在路上。
联系客服