在散点图上绘制多个变量答案

【问题标题】：Plot multiple variables on scatter plot在散点图上绘制多个变量
【发布时间】：2016-04-18 00:16:33
【问题描述】：

我创建了一个如下所示的数据集：

> Data
   ZIP.Code Graduation.Rate  Residences  Tax_Payers   Businesses   Pot_Holes
1     60605      0.00876233 -0.43780716 -0.69756117 -0.705236816 -0.44078331
2     60607     -0.93779113 -0.62411552  0.45619155  0.429939383 -0.82886125
3     60608     -0.35352395  0.77774127  0.83458530  0.694500368  0.28789804
...

每个特征的值都在[-1,1] 范围内进行了缩放。我希望有一个散点图，使得 x 轴具有ZIP_Code 的标签，而 y 轴具有每个缩放值的 4 个标记。我如何在 R 中做到这一点？

【问题讨论】：

将您的数据合并为长格式。
@alistaire 在重新整形后如何以这种方式绘制数据？
类似ggplot(df, aes(x = ZIP_code, y = value, colour = variable)) + geom_point()。如果你编辑用reproducible example，我可以给你一个更完整的答案。
添加了 df Data 的前三个向量。够了吗？

标签： r plot scatter-plot

【解决方案1】：

将您的数据融合为长格式，这样您就可以将所有四个变量的数据传递给一个美学：

df_melt <- reshape2::melt(df, id.var = 'ZIP.Code')

# or
df_melt <- tidyr::gather(df, variable, value, Graduation.Rate:Pot_Holes)

df_melt
#    ZIP.Code        variable       value
# 1     60605 Graduation.Rate  0.00876233
# 2     60607 Graduation.Rate -0.93779113
# 3     60608 Graduation.Rate -0.35352395
# 4     60605      Residences -0.43780716
# 5     60607      Residences -0.62411552
# 6     60608      Residences  0.77774127
# 7     60605      Tax_Payers -0.69756117
# 8     60607      Tax_Payers  0.45619155
# 9     60608      Tax_Payers  0.83458530
# 10    60605      Businesses -0.70523682
# 11    60607      Businesses  0.42993938
# 12    60608      Businesses  0.69450037
# 13    60605       Pot_Holes -0.44078331
# 14    60607       Pot_Holes -0.82886125
# 15    60608       Pot_Holes  0.28789804

使用`ggplot2` 绘图

ggplot(df_melt, aes(x = factor(ZIP.Code), y = value, colour = variable)) + 
    geom_point() + xlab('ZIP Code')

用底图绘制

with(df_melt, plot(ZIP.Code, value, col = variable, pch = 19))

请注意，它存在一些问题，包括排列得很糟糕的 x 轴。如果您真的很喜欢基本图形，那么按摩代码可以修复它们。

【讨论】：

使用ggplot2 绘图

用底图绘制

使用`ggplot2` 绘图