劇情中使用的美學比例| ggplot2

Question

我是ggplot2中的絕對初學者。我對ggplot2感到沮喪，並開始閱讀韋翰的真棒​​書。他說，「一個規模是每個審美使用的情節所需的。」。

所以，我做了以下內容：

嘗試1：

huron <- data.frame(year = 1875:1972, level = as.numeric(LakeHuron)) 
    ggplot(huron, aes(year)) + 
    geom_line(aes(y = level + 5, color = "y+5")) + 
    scale_color_manual(values = c("orange")) + 
    geom_line(aes(y = level - 5, color = "y-5")) + 
    scale_color_manual(values = "blue") 

在運行此，我得到一個錯誤說" insufficient value of colors provided."

我GOOGLE了這一點，並發現了以下線程SO：ggplot2 Error: Insufficient values in manual scale。在原始文章中，爲什麼他/她添加了額外的顏色是有道理的。不過，我不確定爲什麼在我的例子中會出現這種情況，因爲我有兩層，每層都有自己的美學。

嘗試2

此代碼將工作：（在我可以看到兩種不同顏色的兩個線路圖和legend-- 這是我的目標）

ggplot(huron, aes(year)) + 
    geom_line(aes(y = level + 5, color = "y+5")) + 
    scale_color_manual(values = c("orange", "blue")) + #Added another color here. 
    geom_line(aes(y = level - 5, color = "y-5")) 

令人驚訝，上面的代碼顯示了一些奇怪的東西 - 我有兩個美學，只有一個比例。

問題1：這是相當令人驚訝的，因爲我們可以看到有兩個幾何，但只有一個尺度。正確？我知道韋翰不會錯。那麼，我錯過了什麼？

問題2：此外，出於好奇，如果我有多個geoms每一個審美在上述情況下，與一個規模綁各的，怎麼會ggplot知道哪個規模的關係回到其GEOM？和ggplot2一樣，ggplot2如何知道layer1是否與color = red一起縮放，layer2是否與color = blue一起？

我真誠感謝您的想法。提前致謝。

---

Answer 1

要回答的意見的具體問題：

如果要強制特定的顏色，你需要使用scale_color_manual。顧名思義，這需要一些手動工作。

library(ggplot2) 

#default colors 
#http://stackoverflow.com/a/8197703/1412059 
gg_color_hue <- function(n) { 
    hues = seq(15, 375, length = n + 1) 
    hcl(h = hues, l = 65, c = 100)[1:n] 
} 

ggplot(mpg, aes(displ, hwy)) + 
    geom_point(aes(colour = class)) + 
    geom_smooth(method = "lm", se = FALSE, aes(color = "model")) + 
    scale_color_manual(values = setNames(c(gg_color_hue(length(unique(mpg$class))), "red"), 
             c(unique(mpg$class), "model"))) 

然而，我會使用額外的美學爲線型。

ggplot(mpg, aes(displ, hwy)) + 
    geom_point(aes(colour = class)) + 
    geom_smooth(method = "lm", se = FALSE, aes(linetype = "model"), color = "red")