根据线型将图例添加到ggplot折线图中
，可以通过使用scale_linetype_manual()函数来实现。该函数允许我们手动指定线型的名称和对应的数值，然后将其应用到图例中。
下面是一个完整的示例代码：
library(ggplot2)
# 创建示例数据
data <- data.frame(
x = c(1, 2, 3, 4, 5),
y1 = c(1, 3, 2, 4, 3),
y2 = c(2, 1, 4, 3, 2)
)
# 创建折线图
plot <- ggplot(data, aes(x = x)) +
geom_line(aes(y = y1, linetype = "Line 1")) +
geom_line(aes(y = y2, linetype = "Line 2")) +
labs(title = "折线图示例", x = "X轴", y = "Y轴") +
scale_linetype_manual(values = c("solid", "dashed")) +
theme(legend.position = "bottom")
# 显示图例
plot在上述代码中，我们首先创建了一个包含两条折线的示例数据集data。然后，我们使用ggplot()函数创建了一个基础的折线图，并通过geom_line()函数分别添加了两条折线。在aes()函数中，我们使用linetype参数来指定每条折线的线型名称。
接下来，我们使用labs()函数设置了图表的标题和坐标轴标签。然后，通过scale_linetype_manual()函数手动指定了两种线型的名称和对应的数值。在本例中，我们使用了实线和虚线作为两种线型。
最后，我们使用theme()函数将图例位置设置为底部，并通过plot对象显示了最终的折线图。
这是一个简单的示例，你可以根据实际需求进行修改和扩展。如果你想了解更多关于ggplot2的信息，可以参考腾讯云的数据可视化产品Tencent Cloud GCI。
相关·内容
我想更改附图中图例块的顺序，以便“观察”值的图例位于“建模”值的顶部，而不是与当前相反。这里有一个R脚本来说明我的问题：
#Dataframes to illustrate my question
A <- c(10,20,30,40, 50, 70)
B <- c(20,10,30,10, 6, 1)
C <- c("treat1","treat1", "treat1", "treat2", "treat2", "treat2" )
Modeled <- as.data.f
浏览 0提问于2015-11-19得票数 2
我有一个带有连续x和y变量的图，第三个连续变量映射到"size“美学，第四个离散变量映射到"shape”美学。如果我只指定geom_point()，" size“比例的图例将显示不同大小的项目符号，这很好，但如果我还指定geom_smooth，图例将在项目符号上显示一条线，这不是我想要的。在指定geom_smooth()时，是否可以在图例中仅保留项目符号 我试着用 guides(size=guide_legend(override.aes=list(shape="circle"))) 但这并不管用。 这是一个MRE： df <- tibble(a
浏览 12提问于2019-05-15得票数 2
回答已采纳
我在同一张图上绘制条形图和线/点图，并尝试使用两个图例，一个用于点，另一个用于条形图。
然而，我最终得到了3个图例(而不是2个)，并且条形图的图例中有点。你能帮帮我吗?这是MWE
library("ggplot2")
df2 <- data.frame(Height=rep(c("low", "high"), each=3),
Month=rep(c("Jan", "Feb", "March"),2),
Trial =c
浏览 12提问于2020-02-08得票数 1
回答已采纳
1回答
我正在使用R中的ggplot2包创建折线图。 我无法上传数据，因为它是为我的最后一年项目进行的一项研究。所以，我只能和你分享代码。 这是APA格式化图形的代码。 ggplot(accuracy_data,
aes(x = eccentricity, y = accuracy, group= speech_task)) +
geom_line(aes(linetype=speech_task)) +
scale_linetype_manual(values=c("twodash", "dotted", "solid")
浏览 21提问于2020-04-03得票数 0
简单的问题:如何同时为不同打印的线型指定自定义名称和样式并打印图例。 所有打印都使用library(ggplot2)。 示例1:我可以指定首选线型并根据颜色打印图例。 ggplot() +
geom_line(data=data.frame(x=c(0, xv[1]), y=c(0, 1)), aes(x=x, y=y, color = "this one should be dashed"), linetype = "dashed")+
geom_line(data=data.frame(x=c(0, xv[2]), y=c(0, 1)
浏览 18提问于2020-12-04得票数 0
回答已采纳
2回答
我正在尝试将图例添加到使用实线和虚线的ggplot图中。 require(ggplot2)
DATE <- c("2020-10-14", "2020-10-15", "2020-10-16", "2020-10-17", "2020-10-18")
TMAX <- c(47, 45, 43, 40, 4)
TMIN <- c(35, 34, 28, 26, 29)
df <- data.frame(DATE, TMAX, TMIN)
ggplot(data = df, aes(x
浏览 12提问于2020-12-13得票数 1
1回答
我想在hline图中添加一个图例。
我的子集的头看起来像这样
Site Date Al
1 Bo6 2014-10-07 152.1
2 Bo1 2014-10-07 157.3
3 Bo3 2014-10-07 207.1
4 Bo4 2014-10-07 184.3
5 Bo5 2014-10-07 23.2
13 Bo6 2014-10-14 96.8
我的代码如下：
require(ggplot2)
require(reshape2)
require(magrittr)
require(dplyr)
require(tidyr)
setwd(
浏览 2提问于2016-08-24得票数 22
回答已采纳
2回答
我使用的是geom_smooth，它为我提供了不能在绘图中使用的默认图例线颜色蓝色。有没有办法更改geom_smooth图例线的默认颜色？
例如，我想要将下图中线类型的图例颜色更改为黑色
library(reshape2)
library(ggplot2)
d1<-melt(mtcars,id=c("mpg","cyl"))
p<-ggplot(d1,aes(x=mpg,y=value,factor=variable,color=cyl))
p1<-p+geom_smooth(aes(line
浏览 41提问于2017-07-09得票数 2
回答已采纳
3回答
我已经使用了jqplot折线图。我已经使用ajax.In从php页面获取数据，一些条件我将显示特定的series.So
如何在jqplot折线图中动态传递序列并设置序列的图例？
我已经手动编写了上述要求的代码。我已经应用在图例系列上的点击事件，并根据点击图例绘制图形。
我还根据选择/取消选择系列图例更改了y轴值。
浏览 1提问于2012-12-20得票数 3
我想绘制同一组的两个变量，但我需要它们出现在两个独立的图例中，每个变量一个(实线和虚线)，因为它们共享同一组，ggplot在同一图例中显示它们。 下面的代码重现了我的问题。 df = data.frame(
group_ = c("A","A","A","A","A","B","B","B","B","B"),
var1 = c(1:10),
var2 = c(11:20),
x_ = c(1:5))
ggplot
浏览 11提问于2019-03-13得票数 0
回答已采纳
我有一些按三个类别排序的数据，如下所示： toy
# A tibble: 20 x 5
# Groups: v190, treatedgroup [10]
Size Animal Fluffy AvgWeight SE
<fct> <fct> <fct> <dbl> <dbl>
1 Tiny Dog Shorthair 114. 0.0724
2 Tiny Dog Longhair 113. 0.0904
3 Tiny Ca
浏览 26提问于2020-04-08得票数 2
回答已采纳
1回答
这段代码： mtcars %>%
group_by(carb, gear, am) %>%
summarise(mpg = mean(mpg)) %>%
ggplot(aes(x = carb, y = mpg, color = as.factor(gear), linetype = as.factor(am), group = interaction(gear, am)))+
geom_line()+
geom_point()+
theme(legend.box.background = element_rect(color = "b
浏览 10提问于2020-07-04得票数 1
回答已采纳
1回答
以数据集iris为例： 如何将这3行添加到图例中？ ggplot(iris, aes(Sepal.Length, Petal.Width)) +
geom_line(aes(color="line"),lty=4) +
geom_hline(aes(yintercept=1, color="abline"),lty = 1) +
geom_smooth(method = "lm", formula = y ~ x, se = F, aes(color = "Trend"),lty=3) 在本例中，图例线型与打印不匹配
浏览 38提问于2020-12-14得票数 1
回答已采纳
我正试图弄清楚如何控制第一个ggplot中的组参数创建的图例。我喜欢使用组，因为它使信心带更平滑的geom_ribbon以后。如果我只是使用colour=tx.f，信任带看起来非常奇怪，要么是锯齿状的，要么有一条曲线。使用group=tx.f选项的唯一问题是，它创建了另一个我似乎无法摆脱或编辑的图例。关于如何编辑这个传说有什么线索吗？我尝试了很多事情，但我似乎无法编辑那个传说，也无法将它从我的情节中删除。
stai_plot<-ggplot(aes(x = cwk, y = estimate__, group=tx.f, colour=tx.f,
linetype=tx.f), dat
浏览 1提问于2018-03-29得票数 1
回答已采纳
因此，当我必须绘制很多线条时，我可以通过颜色或线型来区分它们
library(ggplot2)
pd = cbind.data.frame(x = rep(c(1,2), each = 4),
y = rep(1:4, times=2),
type = rep(c("A", "B", "C", "D"), times=2))
ggplot(pd, aes(x=x, y=y, col=type)) + geom_line() + theme_bw()
ggplot(pd,
浏览 217提问于2015-07-08得票数 1
回答已采纳
我正在制作一个为geom_point()定义了颜色的图，一切看起来都很好。 points_a <- data.frame(x = sample(1:10, 4), y = sample(50:60, 4), id = "a")
points_b <- data.frame(x = sample(1:100, 4), y = sample(1:100, 4), id = "b")
points_c <- data.frame(x = sample(1:100, 4), y = sample(1:100, 4), id = "c"
浏览 13提问于2020-01-01得票数 3
回答已采纳
1回答
删除图例中的线条
、、
如何删除与图例上的蓝点相交的线？我可以通过使用以下命令从1号和2号项目中删除点 guides(color = guide_legend(override.aes = list(shape = c(NA,NA,16)))) 但不能从第三项中删除行。事先谢谢你。 ? 下面是我正在使用的代码... library(ggplot2)
library(scales)
white.st2 <- structure(list(Year = c(1992, 1993, 1994, 1995, 1996, 1997, 1998,
1999, 2000, 2001, 2002, 2003, 20
浏览 12提问于2020-01-16得票数 0
回答已采纳
我正在尝试使用R和cmprsk包定制竞争风险的曲线图。具体地说，我想要覆盖默认设置，即对于比赛项目使用颜色，对于不同的组使用线型。 下面是我的可重现的例子： library(ggplot2)
library(cmprsk)
library(survminer)
# some simulated data to get started
comp.risk.data <- data.frame("tfs.days" = rweibull(n = 100, shape = 1, scale = 1)*100,
浏览 275提问于2020-10-04得票数 1
回答已采纳
我有我做的这个数据框架。列名是年份。假设您有一个名为fruits的数据帧： apples | bananas | apples
2012 | 23 | 32 | 23
2013 | 26 | 29 | 23
2014 | 32 | 43 | 25
2015 | 23 | 43 | 26
2016 | 21 | 46 | 22 你怎么把它做成折线图呢？我认为最好的方法是使用ggplot。我使用了以下代码： years = seq(from = 2012, to = 2016)
ggplot(data = fruits, mapping = aes(x = years))
浏览 4提问于2020-11-08得票数 0
我要将颜色图例与遵循this answer的线型图例组合在一起。但是，如果将线型指定为显示的here，则不能复制默认线型。 以下是MWE： # data generation
y1 <- abs(rnorm(10))
y2 <- abs(rnorm(10))
y3 <- abs(rnorm(10))
x <- seq(1,10)
df1 <- data.frame(x,y=abs(y1),type=as.factor("a"),method=as.factor("A"))
df2 <- data.frame(x,y=abs(
浏览 41提问于2019-03-25得票数 0
回答已采纳
我想做一个和这个非常相似的情节：
library(ggplot2)
ggplot(data=mtcars, aes(x = wt,y = mpg, colour = factor(cyl))) +
geom_line() + geom_smooth(method = "lm", se=FALSE, lty = 2)
但是，我特别希望在图例中为虚线(线性趋势)和实线(数据)添加一个不同的条目。这看起来很琐碎，但出于某种原因，我还没有弄清楚这一点。
浏览 1提问于2014-03-24得票数 2
回答已采纳
我有一个关于用ggplot2在同一幅图中绘制点和线的问题。生成模拟数据的代码如下：
library(ggplot2)
set.seed(111)
x = seq(1,10,length=10)
y1 = rnorm(10, 0, 0.1)
y2 = rnorm(10, 5, 0.1)
y3 = rnorm(10, 10, 0.3)
y4 = rnorm(10, 20, 0.4)
label = c(rep("Cat",10), rep("Dog", 10), rep("Owl", 10), rep("Eagle", 10))
da
浏览 2提问于2014-10-04得票数 1
回答已采纳
1回答
我在ggplot中有一个图，并且我添加了一条斜线，以显示在多次校正后重要性截断的位置，但该线的图例不会单独显示为显示我的变量的域的第一个图例。相反，它只是在每个域的键上绘制一条虚线。我希望第二个框中有一条黑虚线，标题为"FDR阈值“，并且我不希望第一个图例框的颜色值被黑虚线填充。
geom_abline(aes(slope=0,intercept=-log10(c(var)[astsa::FDR(c(var))]),lty='FDR Correction'),
linetype = "dashed", show.lege
浏览 20提问于2021-06-08得票数 0
回答已采纳
我在这里和google上读到了很多关于ggplot中的传奇的问题。然而，我仍然不能理解为什么下面的代码会产生两个不同的图例，以及如何分别控制它们。
基本上我需要的是格式化在左边的一个文本，因为它产生了正确的视觉效果关于线型，并删除了右边的一个。
如果你能在这方面帮助我，并向我解释为什么后者甚至存在，为什么它为线型产生错误的视觉效果，以及为什么它是我试图格式化图例时唯一受到影响的，我将非常感谢。
附注:在我尝试格式化图例之前，第二个图例甚至还不存在。
如果它们还没有安装，则需要安装这些包。
install.packages(ggplot2)
install.packages(reshape2)
浏览 7提问于2019-11-03得票数 2
1回答
我想添加一个图例，指定我所使用的两种线型之间的区别。我很确定这是很基本的事情，但我不能让它工作，尽管尝试了不同的东西……
你可以在下面找到我的代码的重述。
x<-c(1:10)
y<-c(runif(10,min=50,max=100))
z<-c(runif(10,min=50,max=100))
group=c("A","A","B","C","B","C","C","B","A","B")
session=c(r
浏览 7提问于2019-10-30得票数 0
回答已采纳
我在ggplot2 (对ChickWeight数据帧的虚构修改)中有以下绘图：
require(ggplot2)
ChickWt <- data.frame(ChickWeight, Sex = rep(c("M", "F"), times = 289))
p1 <- ggplot(ChickWt, aes(x=Time, y=weight,
colour=Diet, Group = Chick, linetype = Sex)) + geom_line()
p1
这会产生以下结果：
这很好，除了图例。
我希望图例是四对：
饮食1-M
浏览 0提问于2015-11-15得票数 0
下面的图是创建一个ggplot，其中我根据原始数据(点)和根据我的模型(虚线，每个变量对应不同的ID)显示两个变量之间的关系。 Plot_a <- ggplot(Todo.6min, aes(x=VeDBA.V13AP, y=VeDBA.X16, colour=ID)) +
geom_point(size=1.5,alpha=0.2) +
geom_line(aes(y=predict(mod3.6min,df.6min), group=ID), size=3, alpha=0.6, linetype="dashed") +
geom_abline(aes
浏览 27提问于2020-10-29得票数 0
回答已采纳
1回答
我的条形图的图例当前在一个长列表中列出了该图中的所有项目。我希望每个列都有图例组本身。 列数是动态的，因此图例必须能够相应地进行调整。 library("phyloseq"); packageVersion("phyloseq")
library(ggplot2)
library(scales)
data("GlobalPatterns")
TopNOTUs <- names(sort(taxa_sums(GlobalPatterns), TRUE)[1:50])
gp.ch <- prune_species(TopNOTUs,
浏览 22提问于2019-05-10得票数 1
回答已采纳
我有以下问题。在我的例子中，我绘制了7个不同的结果行(7个模型)。我需要将它们分成4组(颜色)，每个组都有一个不同的点形状。我的问题是我不能合并这些图例。我尝试了几个不同的选项(实验，统一图例标题，做交互的事情) 这是我的mock.code： mock.df <- data.frame(vec.dat=1:49,
variable = c(rep('Mod01',7),rep('Mod02',7),rep('Mod03',7),rep('Mod04',7),rep('
浏览 88提问于2020-04-12得票数 0
回答已采纳
我得到了一个数据集，并希望将一个变量绘制为点，将其他变量绘制为具有不同线型的线条(每个变量都有不同的颜色)。 a <- c(10:20)
df <- data.frame(a=a,b=a,c=a*a/10,d=10*sqrt(a))
df_melt <- reshape2::melt(df,id.vars='a')
ggplot(df_melt, aes(x=a,y=value,colour=variable,linetype=variable,shape=variable))+
geom_line(data=subset(d
浏览 52提问于2019-03-18得票数 3
回答已采纳
你能帮我去掉下面折线图上的(y轴数据)图例吗？这是帮助从折线图中删除相应折线图的图标。
查看内联图像
浏览 11提问于2015-06-22得票数 2
回答已采纳
1回答
我试图为6条垂直线添加第二个图例，我已经添加到一个代表2个事件中的1个的ggplot2线图中，而不是使用annotate函数标记这些行。我试过这段代码，但我看不太清楚：
p<- data %>%
ggplot(aes(variable, value)) +
geom_line(aes(color = size, group = size)) +
geom_vline(xintercept = c(1,9,11), linetype="dashed") +
geom_vline(xintercept = c(5,14,17), linetype=&
浏览 15提问于2021-12-13得票数 0
回答已采纳
我正在尝试将图例添加到通过ggplot2生成的密度图中，但我尝试使用数字填充图例，而不是添加样本标签。
library(ggplot2)
library(modeest)
set.seed(9)
d1=as.data.frame(rnorm(1000,mean=0.33,sd=0.138))
names(d1)=c("value")
mean_d1=mean(d1$value) #Mean=0.33081
mode_d1=mlv(d1$value,method="shorth")[1] #Mode=0.35191
gg
浏览 10提问于2017-06-23得票数 1
回答已采纳
1回答
如何使geom_hline或geom_abline使用的线型显示在ggplot的图例中？
例如：
require (ggplot2)
# some data
dummy <- data.frame (category1 = rep (1:5, 8), category2 = rep (1:4, each = 10),
category3 = rep (factor (1:2), 2), expected = 10 ^ rep (4:7, each = 10),
value = 10 ^rnorm(40, 5))
# faceted plot
baseplot &l
浏览 0提问于2013-06-04得票数 3
回答已采纳
当用户单击折线图图例时，我希望隐藏折线图中的折线。有没有什么方法可以在Google Chart API中完成？我在Highcharts上看到了这个特性。
浏览 1提问于2013-06-10得票数 4
2回答
一段时间以来，我一直在努力在我的ggplot中创建一个传奇，但我找不到任何可行的答案。 这是我的ggplot的精简版本： ggplot() +
geom_smooth(data = mydf1, aes(x, predicted, linetype = 1), method = "lm", linetype = 1, colour = "black") +
geom_smooth(data = mydf2, aes(x, predicted, linetype = 2), method = "lm", linetype = 2, c
浏览 25提问于2021-10-25得票数 2
回答已采纳
1回答
我有一个折线图，其中的图表图例也是以折线图的形式出现的。是否可以将图例类型从彩色line更改为彩色circle或square
与类似的图形
浏览 4提问于2009-06-03得票数 0
1回答
vec1 <- data.frame(x=rnorm(30))
vec2 <- data.frame(x=rnorm(100))
vec3 <- data.frame(x=rnorm(180))
ggplot() +
geom_density(aes(x=x), linetype="solid", data=vec1) +
geom_density(aes(x=x), linetype="dashed", data=vec2) +
geom_density(aes(x=x), linetype="dotted", data=
浏览 4提问于2014-02-17得票数 0
回答已采纳
在plot.ly中，您可以为图例单击事件添加侦听器。如何找出我单击的图例中的哪条轨迹？对于更具体的示例，假设我在折线图中有两个轨迹(trace0，trace1)。当用户单击图例中的trace0时，我希望显示一个警告，上面写着"trace0“。类似地，当用户单击图例中的trace1时，我希望看到一个警告，提示不同的内容。我可以很好地发出警报，但我找不到任何有关plot.ly如何识别在图例中单击了哪个跟踪的文档。有什么帮助吗？
浏览 20提问于2021-09-08得票数 0
回答已采纳
我想绘制一个数据集，其中点的大小与x变量成比例，并具有一条95%预测区间的回归线。我写的“示例”代码如下：
# Create random data and run regression
x <- rnorm(40)
y <- 0.5 * x + rnorm(40)
plot.dta <- data.frame(y, x)
mod <- lm(y ~ x, data = plot.dta)
# Create values for prediction interval
x.new <- data.frame(x = seq(-2.5,
浏览 0提问于2016-11-15得票数 0
2回答
删除R中的图例
、、
如何在R中删除绘图中的图例？我尝试过legend<-FALSE，不起作用。另外，有没有更好的方法来设置图例的位置？例如，有没有一种方法可以让我用光标选择位置？我不是在谈论ggplot或任何花哨的附加组件，只是常规的R绘图。
浏览 4提问于2011-09-10得票数 4
回答已采纳
我发现组合的传奇形状和线型是很难破译的。具体来说，这个形状很难看出来，因为它在线后面，而且太小了。
library(ggplot2)
ggplot(mtcars)+
geom_point(aes(x=hp,y=mpg,shape=as.factor(cyl)))+
geom_smooth(aes(x=hp,y=mpg,linetype=as.factor(cyl)),method='lm')+
theme_bw(base_size=18)
如何在不增加线条大小的情况下增加图例中形状的大小？
这种尝试在下面增加了两者的大小(不是我想要的)。guide_legend的顺序似乎也不影
浏览 1提问于2015-12-09得票数 4
回答已采纳
考虑数据：
enter code here
group <- rep(c("a", "b"), each=10)
res <- c(sample(20:30,10,T),sample(60:80,10,T) )
sd <- rnorm(20,2)
t <- rep(1:10,2)
df <- data.frame(t=t,group=group, res=res, sd=sd)
所以我想要这个情节：
ggplot(df, aes(x=t, y=res,
group=group,
浏览 4提问于2016-11-30得票数 1
回答已采纳
1回答
我已经使用ggplot中的mapply和stat_fuction函数创建了一个具有多个正态分布的图。我已经为每条线分配了唯一的颜色和线型(虚线或实线)，但我还没有想出如何在图中包含图例。这是我第一次在ggplot中使用stat_function，完全不知道这个函数是如何与美学映射函数(aes)对话来创建图例的。下面的代码将生成没有图例的图形，但我尝试生成图例。我需要图例来显示每个正态分布的颜色和线型(虚线或实线)。 任何协助都将不胜感激。提前谢谢。 library(ggplot2)
p1 <- ggplot(data = data.frame(x = c(0.707, 0.757))
浏览 11提问于2020-07-20得票数 0
回答已采纳
通过下面的代码，我得到了两个数据集的一个图。第一个数据的geom_line是虚线。然而，在传说中，它并不是这样出现的。
library(ggplot2)
A = data.frame(x = rnorm(10),y=rnorm(10))
B = data.frame(x = rnorm(10),y=rnorm(10))
ggplot()+
geom_line(data = A,aes(x,y,colour = "cat"),linetype = 2)+
geom_line(data = B,aes(x,y,color = "dog"))+
scal
浏览 2提问于2020-07-21得票数 1
回答已采纳
我想在ggplot中手动更改交互图中几条线的线型。本质上，x=连续，y=连续，主持人=分类(5级)。 我已使用scale_linetype_manual参数指定了所需的线型，但无论出于何种原因，线型都没有更改。我可以成功地更改线条颜色，但不能更改线型。 ggplot(data=subset(study6, !is.na(condition_control)), aes(x=attitude, y=support, color=condition_control)) +
stat_smooth(method="lm", se = FALSE) +
labs(x =&
浏览 42提问于2019-03-29得票数 1
1回答
我在excel折线图中有40个系列的数据，每个数据点都被设计为na()，这样一开始实际上没有数据显示。
用户可以通过单击复选框来激活系列(这会将na()更改为参考表中的实际数字)
当一个系列变为活动状态时，我希望仅为该系列显示图例。目前，即使没有显示数据，图例也会显示所有40个系列。
任何帮助都是非常感谢的。
浏览 0提问于2016-01-21得票数 0
我正在尝试更改ggplot2中的图例以匹配我的实际绘图。我有一种感觉，这很难，因为我没有使用分组。我绘制了两个独立的变量(VO2和VCO2)和一个变量作为一条线(WorkRate)。我还手动设置了颜色和形状。如您所见，图例停留在默认形状上。一般情况下，我对ggplot和R比较陌生，所以下面的代码可能很可怕。尽管如此，任何帮助都将不胜感激。 VO2VCO2 <- ggplot(parvo_data, aes(x=Time)) +
geom_point(aes(y=VO2, colour="VO2"), size= 4, alpha = 1, shape = 1) +
浏览 11提问于2020-01-23得票数 0
回答已采纳
我有4个部门(A，B，C，D)和5年的数据。我想画4条线，每个扇区1条，每年添加一个点，添加第五条线，使用stat_summary语句并通过aes()参数中的scale_color_manual和点形状控制线的颜色。问题是，如果我添加点geom，图例将被分成两部分，一部分用于点形状，另一部分用于线颜色。我不明白如何获得1个组合颜色和点的图例。
下面是一个例子。首先，让我们按如下方式构建数据帧dtfr：
a <- 100; b <- 100; c <- 100; d <- 100
for(k in 2:5){
a[k] <- a[k-1]*(1+rnorm(1)
浏览 1提问于2013-06-22得票数 5
我想要生成一个图，它指定第1行是带实线的线性趋势，第2行是带有长破折线的水平线。下面是和其他方面的技巧，在geoms中映射行类型之后，我使用scale_linetype_manual()来指定它们。
考虑：
library(dplyr)
library(ggplot2)
p <- ggplot(
data = mutate(mtcars, limit = 20),
mapping = aes(x = hp, y = mpg)
) +
theme_bw() +
geom_point(color = "purple") +
geom_smooth(
浏览 16提问于2022-08-02得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
即时通信 IM活动推荐
腾讯云开发者
