R语言 如何在R中创建一个堆积点阵图

堆积点阵图是一种用点来显示频率的图，一个一个地堆积起来。主要有两种方法来制作堆积点阵图，本文将对这两种方法进行讨论。

方法1：使用 stripchart()

因此，使用第一种方法，即 stripchart 方法，来创建我们的堆叠点阵图。例如，如果我们没有一组值，我们甚至可以让它们，为我们的目的服务。我们将创建一个数值集，其中包含从0到30的数字，也包括这两个范围，也就是说，数值集也包括0和30。在创建完数值集后，我们将根据这些数值绘制我们的叠加点阵图。我们将使用函数set.seed()，来重现一个特定的 “随机 “数字序列。 stripchart产生给定数据的一维散点图（或点图）。

语法： stripchart(x, …)

例子 。

# sets the starting number used
# to generate a sequence of random
# numbers
set.seed(0)
 
# shows 100 such randomly generated
# numbers from 0 to 20
data <- sample(0:30, 500, replace = TRUE)
 
# creates the stacked data plot
stripchart(data, method = "stack")

输出 。

但是，我们做的点阵图并不那么讨人喜欢，比如整个堆积的点阵图在X轴上方，所以现在我们要对它进行一些编辑，使它看起来更有趣。

例子 。

# sets the starting number which is used
# to generate a sequence of random numbers
set.seed(0)
 
# shows 100 such randomly generated
# numbers from 0 to 20
data <- sample(0:30, 500, replace = TRUE)
 
# creates the stacked dotplot, given
# some more parameters to make the
# stacked dotplot look more attractive
stripchart(data, method = "stack", at = 0,
           pch = 16, col = "darkgreen",
           main = "Stacked Dot Plot",
           xlab = "X-Axis Values",
           ylab = "Y-Axis Values")

输出 。

方法2：使用geom_dotplot()

在点阵图中，点的宽度与bin宽度（或最大宽度，取决于分层算法）相对应，点是堆积的，每个点代表一个观测值。

语法： geom_dotplot()

参数。

• dotsize： 相对于binwidth的点的直径，默认为1。
• stackratio： 堆叠点的距离。默认值为1，即点与点之间刚刚接触。使用较小的值来表示较近的、重叠的点。
• fill： 堆叠中的点的内部颜色。
• color： 堆叠中的点的外部轮廓颜色。

例子 。

# loads required package
require(ggplot2)
 
# sets the starting number used
# to generate a sequence of random
# numbers
set.seed(0)
 
# shows 100 such randomly generated
# numbers from 10 to 50
data <- data.frame(x = sample(10:50, 100, replace = TRUE))
 
# creates the stacked dot plot
ggplot(data, aes(x = x)) + geom_dotplot()

输出 。

同样，对于这个问题，我们也可以让它变得更有趣一些，增加一些参数。

例子 。

# load ggplot2
library(ggplot2)
 
set.seed(0)
data <- data.frame(x = sample(0:20, 100, replace = TRUE))
 
# create customized stacked dot plot
ggplot(data, aes(x = x)) +
  geom_dotplot(dotsize = 1.5, stackratio = 1,
               fill = "darkgreen", color = "green") +
labs(title = "Stacked Dot Plot", x = "X-Axis", y = "Y-Axis")

输出 。