数据可视化之 星图

      在数据可视化中，如果数据是三维或者不多于六维的话，那么星图就是反映数据分布得最佳图像。R的基础包里面提供了绘制星图的函数——stars()函数。每一个星图都是由五个角构成，用线段离中心的长度来表示变量值的大小，用于展示多个变量的个体，每个变量的图形相互独立，即每个角都有一条轴线与中心点连接起来这五条轴线,它们分别对应了数据的维度，数值越大，轴线越长，画出来的星图也就越大，因此说如果数据维度不超过六维的适合用星图来分析。由于星图整幅图形看起来像星星一样，因此称之为星图。
      首先我们来看看stars()函数的原型：

stars(x, full = TRUE, scale = TRUE, radius = TRUE,
      labels = dimnames(x)[[1]], locations = NULL,
      nrow = NULL, ncol = NULL, len = 1,
      key.loc = NULL, key.labels = dimnames(x)[[2]],
      key.xpd = TRUE,
      xlim = NULL, ylim = NULL, flip.labels = NULL,
      draw.segments = FALSE,
      col.segments = 1:n.seg, col.stars = NA, col.lines = NA,
      axes = FALSE, frame.plot = axes,
      main = NULL, sub = NULL, xlab = "", ylab = "",
      cex = 0.8, lwd = 0.25, lty = par("lty"), xpd = FALSE,
      mar = pmin(par("mar"),
                 1.1+ c(2*axes+ (xlab != ""),
                 2*axes+ (ylab != ""), 1, 0)),
      add = FALSE, plot = TRUE, ...)

下表则是对这些参数的大致说明:

参数	描述
x	一个多维数据矩阵或数据框，每一行数据将生产一个星图
full	逻辑值，决定图形是圆形还是半圆，默认为true
scale	是否将数据标准化到区间[0,1]，默认为true
radius	是否画出半圆半径，也就是星图内部的那些线段，默认为true
labels	每个星图个体的名称，默认为数据的行名
locations	以一个两列的矩形给出每个星图的位置，默认放在一个规则的矩形网络上，若提供给参数一个长度为2的向量，那么所有星图都将被放在该坐标上，从而形成一个蜘蛛网或雷达图。
len	半径和线段的缩放倍数
key.loc	比例尺的坐标位置
key.labels	比例尺的标签，默认为变量的名称
key.xpd	比例尺的作图范围
file.labels	每个星图底部的名称是否相互上下错位，以免因名称太长导致文本相互重叠
draw.segments	是否做线段图，即每个变量以一个扇形表示，默认为false
col.segments	每个扇形区域的颜色，注：draw.segments为false时无效
col.stars	设置某个特定星图的颜色  注：draw.segments为false时无效
frame.plot	是否给整个图形画一个边框

   我们使用的数据集是iris数据集。现在开始我们的第一个星图吧。

stars(iris)

如果我们不需要星图内部的那些小线段的话，那就设置radius为FALSE.

stars(iris,radius=FALSE)

如果说我们只需要显示每个星图的一半，只需要将参数full设置为FALSE.

stars(iris,full=FALSE)

如果我们需要显示每一个变量的话就要提供labels参数，它默认为空。通过head(iris)查看到iris数据集每行变量名为第五列。

head(iris)
x<-iris[,5]#此时的x为factor，我们需要将它转为character类型
x<-as.character(x)
class(x)#检查数据类型是否转换成功
stars(iris,labels=x)#画图

但我们发现这个排版特别乱，变量名和星图之间相互重叠。这个时候我们就需要flip.labels参数设置为FALSE即可。

stars(iris,labels=x,flip.labels=FALSE)

   这张图的话就是底下几行的变量名字太长重合了，我们可以win.graph（）函数，它可以设置图像面板的大小，也可以设置字体大小。

win.graph(width=10.5, height=9.5,pointsize=9)
stars(iris,labels=x,flip.labels=FALSE)

这下是不是整齐多了。

颜色：

接下来，我们谈谈颜色，这里主要有一下几种对颜色设置的方法：

1.给每个块加颜色

使用draw.segments参数

stars(iris,draw.segments = TRUE)

     使用col.segments 参数，只有当draw.segments 为 TRUE时，col.segments 参数才有效。

stars(iris,draw.segments = TRUE,col.segments = rainbow(8))

2.线条加色

在对线条加色是，我们仅需对col.lines参数进行设置，仅当draw.segments 为FALSE时才有效。

stars(iris,draw.segments = FALSE,col.lines=c(1:150))

   好了，这就是对星图的一个总结，现在，我们就来一个大综合，将前面这些综合在一块来绘制一副图。

win.graph(width=10.5, height=9.5,pointsize=9)
stars(iris,draw.segments = TRUE,col.segments = rainbow(7),
main="iris数据分析", frame.plot = TRUE,labels=x,flip.labels=FALSE)#frame.plot是给图片四周加了一个黑框

注：本博客也会同步发布在微信公众号《跟着菜鸟一起学R语言》

转载请注明原文链接：http://blog.csdn.net/wzgl__wh/article/details/52827937