使用 ggplot 绘制具有多列的选定行
Plot selected rows with multiple columns with ggplot
我有一个包含 34 列和 600 多行的数据集。
我成功地使用 reshape2
重塑了我的数据以预测 5 列(5 年)
Dataset_name <- melt(data=XYZ, id.vars=c("A", "B", "C",.... {so在负 5 列上}))
现在我有了重塑后的数据并绘制了图表,但由于每列中有 600 多个点,我无法理解它。
我可以在一个图表中绘制顶部的第 1 行到第 50 行,然后在另一个图表中绘制第 51 行到第 100 行等等吗?
另外,我想把这些点联系起来,看看它们是否随着时间的推移而变化。
谢谢。
您可以分配行号(前 50 个指定为 1,第二个 50 个指定为 2...)并在 facet_wrap
中使用该变量。因此,每个方面将包含 50 个数据点。这是 R 附带的 iris
数据集的示例。
library(ggplot2)
nrow(iris) # 150, let's do 50 obs. per facet
iris <- iris[sample(1:nrow(iris)), ] # shuffle the dataset
iris$desig <- rep(c("set1", "set2", "set3"), each = 50)
ggplot(iris, aes(x = Sepal.Length, y = Sepal.Width, color = Species)) +
theme_bw() +
geom_point() +
facet_wrap(~ desig)
我有一个包含 34 列和 600 多行的数据集。
我成功地使用 reshape2
重塑了我的数据以预测 5 列(5 年)Dataset_name <- melt(data=XYZ, id.vars=c("A", "B", "C",.... {so在负 5 列上}))
现在我有了重塑后的数据并绘制了图表,但由于每列中有 600 多个点,我无法理解它。
我可以在一个图表中绘制顶部的第 1 行到第 50 行,然后在另一个图表中绘制第 51 行到第 100 行等等吗?
另外,我想把这些点联系起来,看看它们是否随着时间的推移而变化。
谢谢。
您可以分配行号(前 50 个指定为 1,第二个 50 个指定为 2...)并在 facet_wrap
中使用该变量。因此,每个方面将包含 50 个数据点。这是 R 附带的 iris
数据集的示例。
library(ggplot2)
nrow(iris) # 150, let's do 50 obs. per facet
iris <- iris[sample(1:nrow(iris)), ] # shuffle the dataset
iris$desig <- rep(c("set1", "set2", "set3"), each = 50)
ggplot(iris, aes(x = Sepal.Length, y = Sepal.Width, color = Species)) +
theme_bw() +
geom_point() +
facet_wrap(~ desig)