r - ggplot2 中带有 geom_line 和 geom

r - ggplot2 中带有 geom_line 和 geom_point 的图例

转载作者：行者123 更新时间：2023-12-05 00:13:22

我有以下图表。如您所见，它由两条用 geom_line 制作的实线和由 geom_point 制作的灰线点组成。该图正是我需要的样子，但是，图例并未显示灰线也有点 - 需要包括在内，因为 图像将以黑白打印。

这是我正在使用的代码

library(ggplot2)
library(reshape2)

ggplot(base_fin, aes(x = fecha, y = valor)) +
     geom_line(aes(colour = Serie, linetype= Serie, size = Serie)) + 
     facet_wrap(~ indicador_f, scales = "free") + theme_bw() + 
     theme(legend.title = element_blank(), 
           legend.position="bottom", 
           text=element_text(family="Calibri"),
           plot.caption=element_text(size =8)) +
     labs( x =" ", 
           y = "Balance %",
           caption = "Fuente: Fedesarrollo - Encuesta de Opinión Empresarial ") + 
     geom_point(data = pick(~ Serie == "Desestacionalizada"),
                size = 1,
                shape=21, 
                fill = "#696969") +
  scale_color_manual(values=c("#696969","#A52A2A")) + 
  scale_linetype_manual(values=c("solid", "solid")) +
  scale_size_manual(values = c(0.7, 0.7))

函数 pick 取自这个 post 并且是

pick <- function(condition){
  function(d) d %>% filter_(condition)
}

这是 base_fin 对象的 dput 版本。

structure(list(Serie = c("Original", "Original", "Original", 
"Original", "Original", "Original", "Original", "Original", "Original", 
"Original", "Original", "Original", "Original", "Original", "Original", 
"Original", "Original", "Original", "Original", "Original", "Original", 
"Original", "Original", "Original", "Original", "Original", "Original", 
"Original", "Original", "Original", "Original", "Original", "Original", 
"Original", "Original", "Original", "Original", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Original", "Original", "Original", "Original", "Original", "Original", 
"Original", "Original", "Original", "Original", "Original", "Original", 
"Original", "Original", "Original", "Original", "Original", "Original", 
"Original", "Original", "Original", "Original", "Original", "Original", 
"Original", "Original", "Original", "Original", "Original", "Original", 
"Original", "Original", "Original", "Original", "Original", "Original", 
"Original", "Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Original", "Original", "Original", "Original", 
"Original", "Original", "Original", "Original", "Original", "Original", 
"Original", "Original", "Original", "Original", "Original", "Original", 
"Original", "Original", "Original", "Original", "Original", "Original", 
"Original", "Original", "Original", "Original", "Original", "Original", 
"Original", "Original", "Original", "Original", "Original", "Original", 
"Original", "Original", "Original", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada", "Desestacionalizada", 
"Desestacionalizada", "Desestacionalizada"), indicador = c("Pedidos", 
"Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", 
"Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", 
"Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", 
"Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", 
"Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", 
"Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", 
"Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", 
"Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", 
"Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", 
"Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", 
"Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", 
"Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", "Pedidos", 
"Pedidos", "Existencias", "Existencias", "Existencias", "Existencias", 
"Existencias", "Existencias", "Existencias", "Existencias", "Existencias", 
"Existencias", "Existencias", "Existencias", "Existencias", "Existencias", 
"Existencias", "Existencias", "Existencias", "Existencias", "Existencias", 
"Existencias", "Existencias", "Existencias", "Existencias", "Existencias", 
"Existencias", "Existencias", "Existencias", "Existencias", "Existencias", 
"Existencias", "Existencias", "Existencias", "Existencias", "Existencias", 
"Existencias", "Existencias", "Existencias", "Existencias", "Existencias", 
"Existencias", "Existencias", "Existencias", "Existencias", "Existencias", 
"Existencias", "Existencias", "Existencias", "Existencias", "Existencias", 
"Existencias", "Existencias", "Existencias", "Existencias", "Existencias", 
"Existencias", "Existencias", "Existencias", "Existencias", "Existencias", 
"Existencias", "Existencias", "Existencias", "Existencias", "Existencias", 
"Existencias", "Existencias", "Existencias", "Existencias", "Existencias", 
"Existencias", "Existencias", "Existencias", "Existencias", "Existencias", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas", "Expectativas", "Expectativas", 
"Expectativas", "Expectativas"), valor = c(-17.17171717, -27.77777778, 
-20.1320132, -18.58974359, -23.33333333, -20.66666667, -25.33333333, 
-18.87417219, -16.0130719, -6.774193548, -3.986710963, -5.555555556, 
-12.75167785, -22.48322148, -8.783783784, -20.06688963, -13.75838926, 
-15.43624161, -18.27242525, -15.89403974, -10.63122924, -16.82847896, 
-18.33333333, -10.33333333, -17.20779221, -24.83221477, -25.08143322, 
-25.97402597, -39.03225806, -32.6984127, -36.6, -36.8, -24.9, 
-31.3, -26.1, -20.1, -30.6, -19.4257298154394, -25.9703685089816, 
-20.3861344496961, -19.9101495485428, -20.2239880538989, -14.7113316572407, 
-18.4819137673646, -16.1717368034689, -14.5959502677081, -10.1431943447449, 
-9.49293856715717, -14.3431833224798, -15.0175314884738, -19.1589828272007, 
-12.6622028387228, -17.2785369642709, -14.7137454056914, -10.9863208231779, 
-11.4260631196951, -10.2079867573836, -12.2402042667793, -20.1852851357549, 
-22.3325699889125, -20.6210295709765, -17.9890424366566, -23.0052463035128, 
-25.33605349585, -28.7634410505091, -32.8858545079308, -29.7448456266512, 
-29.7526508392999, -31.1156337087039, -26.5237131647522, -33.1488467400888, 
-31.5932131466922, -30.3890229099213, -29.88786713631, 1.219512195, 
8.097165992, 3.375527426, 5.555555556, 7.594936709, 4.979253112, 
8.032128514, 7.723577236, 6.772908367, 3.585657371, 0.803212851, 
2.409638554, -5.761316872, 0, -2.868852459, 3.629032258, 1.176470588, 
4.6692607, 3.984063745, 8.661417323, -0.396825397, 1.526717557, 
5.416666667, 2.352941176, -1.176470588, 2.857142857, 6.692913386, 
5.303030303, 10.546875, 15.11627907, 10, 10.7, 9.1, 7.2, 7.1, 
3.6, -3.6, 6.35643479390351, 10.6459166732001, 5.22344247559281, 
5.67243419069118, 6.3263552672748, 2.29230191391349, 4.42003999148902, 
5.07647767727737, 5.30771779345801, 3.47331159793118, 1.31249391251287, 
3.91085347572511, -0.297051262491389, 2.27599773853472, -0.946351168644105, 
4.05145498630362, -0.392452138283862, 2.01810682125391, 0.477707150907406, 
5.25257945478279, -1.18446517966137, 1.46378983700101, 5.48183798990593, 
4.14461402558536, 4.2191872798374, 5.53413370570711, 8.62207440746222, 
5.77040428025131, 8.64092656975902, 12.5352275433627, 6.52539967912879, 
7.21936961650841, 8.27293183570152, 6.80422490588575, 7.360242701794, 
5.38182228563597, 1.63457896220321, 11.94539249, 38.28382838, 
45.48494983, 36.4516129, 30.74324324, 28.28282828, 33.55704698, 
26.75585284, 31.56146179, 29.12621359, 11.0367893, -1.973684211, 
10.77441077, 38.46153846, 37.16216216, 36.12040134, 32.66666667, 
35.5704698, 33.44481605, 41.13712375, 34.00673401, 25.72347267, 
7.216494845, 0.67114094, 12.54125413, 33.33333333, 31.57894737, 
28.66449511, 24.02597403, 21.3592233, 30.6, 29.8, 28.3, 28.3, 
7.1, -6.4, 12.7, 19.6082854187009, 28.3975943937634, 36.7646031275808, 
32.8922669367486, 27.7187265106525, 26.9910138247318, 28.0425905989078, 
18.908960340379, 23.8288780341071, 28.8238115639326, 26.7623103887625, 
22.4829956248288, 18.8169769197174, 28.5770502232341, 28.4130406430057, 
30.4136428782344, 31.6073593808502, 34.1917179768746, 27.8173747579929, 
33.1807504629413, 26.3231570813892, 25.2681111602547, 22.9790320315865, 
25.2451317852747, 20.7348942514042, 23.4654135930006, 22.8591878864177, 
24.9294286030083, 20.9981164515538, 20.0199851054753, 24.9196082768083, 
21.8203205863293, 20.6515258913999, 27.6879437780452, 22.8389127771605, 
18.2480968382284, 20.9244154820531), fecha = structure(c(16405, 
16436, 16467, 16495, 16526, 16556, 16587, 16617, 16648, 16679, 
16709, 16740, 16770, 16801, 16832, 16861, 16892, 16922, 16953, 
16983, 17014, 17045, 17075, 17106, 17136, 17167, 17198, 17226, 
17257, 17287, 17318, 17348, 17379, 17410, 17440, 17471, 17501, 
16405, 16436, 16467, 16495, 16526, 16556, 16587, 16617, 16648, 
16679, 16709, 16740, 16770, 16801, 16832, 16861, 16892, 16922, 
16953, 16983, 17014, 17045, 17075, 17106, 17136, 17167, 17198, 
17226, 17257, 17287, 17318, 17348, 17379, 17410, 17440, 17471, 
17501, 16405, 16436, 16467, 16495, 16526, 16556, 16587, 16617, 
16648, 16679, 16709, 16740, 16770, 16801, 16832, 16861, 16892, 
16922, 16953, 16983, 17014, 17045, 17075, 17106, 17136, 17167, 
17198, 17226, 17257, 17287, 17318, 17348, 17379, 17410, 17440, 
17471, 17501, 16405, 16436, 16467, 16495, 16526, 16556, 16587, 
16617, 16648, 16679, 16709, 16740, 16770, 16801, 16832, 16861, 
16892, 16922, 16953, 16983, 17014, 17045, 17075, 17106, 17136, 
17167, 17198, 17226, 17257, 17287, 17318, 17348, 17379, 17410, 
17440, 17471, 17501, 16405, 16436, 16467, 16495, 16526, 16556, 
16587, 16617, 16648, 16679, 16709, 16740, 16770, 16801, 16832, 
16861, 16892, 16922, 16953, 16983, 17014, 17045, 17075, 17106, 
17136, 17167, 17198, 17226, 17257, 17287, 17318, 17348, 17379, 
17410, 17440, 17471, 17501, 16405, 16436, 16467, 16495, 16526, 
16556, 16587, 16617, 16648, 16679, 16709, 16740, 16770, 16801, 
16832, 16861, 16892, 16922, 16953, 16983, 17014, 17045, 17075, 
17106, 17136, 17167, 17198, 17226, 17257, 17287, 17318, 17348, 
17379, 17410, 17440, 17471, 17501), class = "Date"), indicador_f = structure(c(1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 
2L, 2L, 2L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 
3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 
3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 
3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 
3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L), .Label = c("Pedidos", 
"Existencias", "Expectativas"), class = "factor")), .Names = c("Serie", 
"indicador", "valor", "fecha", "indicador_f"), row.names = c(NA, 
-222L), class = "data.frame")

我很感激任何帮助。

提前致谢!

最佳答案

您可以制作 shape = Serie整个情节的美学，然后使用 scale_shape其中“原始”的形状是 NA并且没有绘制。

ggplot(base_fin, aes(x = fecha, y = valor, shape = Serie)) +
    geom_line(aes(colour = Serie, linetype= Serie, size = Serie)) + 
    facet_wrap(~ indicador_f, scales = "free") + theme_bw() + 
    theme(legend.title = element_blank(), 
          legend.position="bottom", 
          plot.caption=element_text(size =8)) +
    labs( x =" ", 
          y = "Balance %",
          caption = "Fuente: Fedesarrollo - Encuesta de Opinión Empresarial ") + 
    geom_point(data = pick(~ Serie == "Desestacionalizada"),
               size = 1,
               fill = "#696969") +
    scale_color_manual(values=c("#696969","#A52A2A")) + 
    scale_linetype_manual(values=c("solid", "solid")) +
    scale_size_manual(values = c(0.7, 0.7)) +
    scale_shape_manual(values = c(21, NA))

GGplot 使用 aes()映射以找出图例的外观以及如何组合它们，因此此类问题通常需要映射美学。

结果:

PS:一旦像这样设置了情节，您现在不再需要覆盖 geom_point()中的数据, 所以 pick()不再需要。

关于r - ggplot2 中带有 geom_line 和 geom_point 的图例，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/48777422/

文章推荐： SQL 服务器 : Where clause inside IF .。别的

文章推荐： json - 如何在 React 中渲染 JSON

文章推荐： r - 添加一个带有 apply 和 gregexpr 的新列

文章推荐： scala - 克服 Akka Persistence 中对持久消息类的更改

使用基本图形重新创建ggplot2 geom_point()
我有以下ggplot2代码，我想使用基本图形而不是ggplot2来生成类似的输出-但我似乎找不到找到一种方法来区分正常绘图中的多个“属性”。我错过了什么吗？ Ggplot2: ggplot(data.
r - geom_point 如何删除包含缺失值的行？
我不确定为什么我的数据点都没有显示在 map 上。 Store_ID visits CRIND_CC ISCC EBITDAR top_bottom Latitude Longitud
R:geom_point - 如何在图形顶部显示统计信息
我用 geom_point 做了一个图来自 ggplot2 (只是显示其中的一部分)。颜色代表 3 个类别。黑条是平均的(与问题无关)。数据结构如下(存储在列表中):
r - 通过两组区分 geom_point
这是我到目前为止所得到的: df<-data.frame(x=(1:100), y=rnorm(100), Mode=c(rep('Walk
r - geom_point 点手动缩放
我得到了一些数据(名为 result.df)，如下所示: orgaName abundance pVal score
r - 将自定义图像显示为 geom_point
这个问题在这里已经有了答案: How to use an image as a point in ggplot? (3 个回答) 3年前关闭。是否可以在 R ggplot 中将自定义图像(比如 pn
r - 在ggplot2中定义最小点大小-geom_point
假设我在0,1附近有很多值，在10附近有一些值，我已经将它们映射为: geom_point(aes(size=value)) ..这给了我这样的图像: 很难看到非常小的要点。所以我想知道是否可以为点大
r - geom_point 中的标签点
我正在使用的数据来自下面列出的互联网来源 nba 24,as.character(Name),'')),hjust=0,vjust=0) 关于r - geom_point 中的标签点，我们在Stack
r - geom_point 具有不同的填充和形状图例
嗯，也许是温度的原因，或者我再次没有看到明显的...... 这是我的代码: library(ggplot2) p <- ggplot() p <- p + geom_point(aes(x = 1,
r - geom_point，手动颜色和点大小
我想要将“能量级别”颜色类别分配给较高级别的红色色调，以及较低级别的绿色色调颜色。按以下顺序对“功能级别”类别中每个点的大小进行排序:low_TL、inter_TL、Myrmecophage、me
r - geom_point 精确控制半径而不是缩放它
我的数据由一组带半径的圆组成。 x、y 和半径的比例相同。 x y radius 0.1 0.8 0.1 0.4 0.4 0.2 0.6 0.2 0.9 0.3 0.6 0
r - geom_point 具有不同的填充和形状图例
嗯，也许是温度的原因，或者我再次没有看到明显的...... 这是我的代码: library(ggplot2) p <- ggplot() p <- p + geom_point(aes(x = 1,
r - geom_point，手动颜色和点大小
我想要将“能量级别”颜色类别分配给较高级别的红色色调，以及较低级别的绿色色调颜色。按以下顺序对“功能级别”类别中每个点的大小进行排序:low_TL、inter_TL、Myrmecophage、me
r - geom_point() 彩虹色
我正在研究钻石数据集。我试图绘制克拉 x 价格，颜色代表清晰度。我得到了一个漂亮的调色板，但不是我想要的。它看起来更像是一个渐变，我想要彩虹，每个清晰度都有独特的颜色(我认为对于如此密集的数据图更容易
r - geom_points 的选择性抖动
我有一个 ggplot，其中一些点与其他一些点重叠。我想知道是否有办法将点放在另一个之上。就我而言，最多有 2 个点重叠。 x=c(1,1,2,3,4,4) y=c('a1','a1','a2','a
r - geom_point 图例颜色具有倒置的形状覆盖而不是实际形状
您可以在下图中看到“颜色”图例未正确运行。我期待一个彩色圆圈(例如，一个颜色应该是一个绿色圆圈)，但是背景是绿色的，您可以看到似乎是某种类型边界框的黑色叠加层。这是我的代码: library(ggm
r - geom_point 最小点大小不成比例
我正在使用点大小可视化变量。我的问题是第一个(最小)点大小(在本例中为“70”)明显(不成比例地)比其余点小。 (见CP图例) 这是我正在使用的代码: ggplot(data=testdata, a
R::ggplot2::geom_points:如何用饼图交换点？
我想在两个维度上绘制饼图，以根据其复合“组”显示每个点的组成。到目前为止，我正在使用标签排斥来标记最高分，但效果仍然不是很好。我环顾四周，但没有看到我要找的东西。 ggplot(data=aggtm
r - 根据列中的值更改 geom_point 的大小
我用 geom_point 绘制了数据，数据点的大小由列中的值设置。我想增加这些点的整体大小(并保持相对大小)。我试图将所有值乘以一个数字，但点大小保持不变。我怎样才能增加整体点数？最佳答案修改
r - ggplot2:geom_point() 闪避形状但不是颜色
我正在尝试使用 geom_point() 在 ggplot2 中绘制一个图，该图具有映射到 x、y、颜色和形状的变量，并避开颜色而不是形状的位置。 x=tibble(Color=c(rep('A',1

行者123

个人简介

我是一名优秀的程序员,十分优秀！

作者热门文章

滴滴打车优惠券免费领取

全站热门文章

首页

博学

6Ren·AI

商城

r - ggplot2 中带有 geom_line 和 geom_point 的图例