R 在带有两个图例的ggplot中更改两个图例标题

我的ggplot上有两个图例，有两个不同的图例标题（从

ggplot（）

自动创建）。现在，我想更改这个传奇标题<代码>+labs（color=“图例名称”）仅更改第二个图例标题。我怎样才能改变第一个呢

样本数据：

dataset <- structure(list(date = structure(c(1264572000, 1266202800, 1277362800), 
class = c("POSIXt", "POSIXct"), tzone = ""), 
x1 = c(-0.00183760994446658, 0.00089738603087497, 0.000423513598318936), 
x2 = c("approach x","approach y","approach z"), 
x3 = c("Type1", "Type1", "Type2")) ,
.Names = c("date", "data","code","type"),
row.names = c("1", "2", "3"), class = "data.frame")

---

数据集如果我正确理解了您的观点，您只需使用
+实验室（shape=“shape legend title”，color=“color legend title”）
以下是使用
iris
数据集的示例：

data(iris)
ggplot(iris, aes(x=Sepal.Length, y=Sepal.Width)) +
    geom_point(aes(shape=Species, colour=Petal.Width)) + 
    scale_colour_gradient() +
    labs(shape="Species label", colour="Petal width label")

使用
labs（）
指定标签，并单独指定每个刻度，即
labs（shape=“Species label”，color=“Petal width label”）

您没有提供样本数据，导致代码不可复制。如果您提供我们可以复制的样本数据和代码，您将更容易为您提供帮助。您也可以在via scale（）中指定实验室ggplot（iris，aes（x=Sepal.Length，y=Sepal.Width））+geom_point（aes（shape=Species，color=Petal.Width））+scale\u color\u gradient（“花瓣宽度标签”）+scale\u shape（“物种标签”）谢谢，它的工作。我还有一个问题：我在代码中有许多入口（参见我的示例），因此在绘图中有许多颜色。现在，例如，我只想要颜色“接近z”黑色，而另一个保持不变（它们是自动着色的）。为此，以下代码不起作用：
+scale\u color\u manual（value=c（“接近z”=“黑色”））
@pmuench请查看@Andrie的
scale\u manual
文档中的示例，但它们替换了所有颜色。我只想更换一个，而另一个（自动着色）保持不变。这个问题以前有人问过：
data(iris)
ggplot(iris, aes(x=Sepal.Length, y=Sepal.Width)) +
    geom_point(aes(shape=Species, colour=Petal.Width)) + 
    scale_colour_gradient() +
    labs(shape="Species label", colour="Petal width label")