我有一些向量形式的資料，我將它們放在資料框中以與 ggplot 一起使用。我已經設法將資料輸出為折線圖并分別為它們著色，但我不確定如何標記每組矢量資料，以便我可以以某種方式標記每個折線圖以生成圖例，以便圖表讀取更清晰。我是 R 的超級新手，如果能深入了解我將如何做這件事，我將不勝感激。
Amount <- c(30, 60, 90, 125, 200, 250, 300)
Time <- c(1.6178,1.7141,1.9539,2.1827,2.6227,2.7161,3.0928)
Time3 <- c(1.7704,2.0969,2.3615,2.5359,3.6506,4.0699,4.5538)
Time4 <- c(2.5763,2.7251,2.7857,3.3977,4.7343,5.7973,6.4203)
df2 <- data.frame(var0 = c(Time),
var1 = c(Time3),
var2 = c(Time4))
TimeRange = range(0, 7)
plot <- ggplot(data=df2, aes(x=Amount, y=TimeRange))
geom_line(aes( y = var0 ), color="blue")
geom_line(aes( y = var1 ), color="red")
geom_line(aes( y = var2 ), color="green")
geom_point(aes(y = var0))
geom_point(aes(y = var1))
geom_point(aes(y = var2))
ggtitle("LineGraph plot")
電流輸出
uj5u.com熱心網友回復：
您可以scale_color_manual在此代碼中將名稱更改為您想要的名稱：
Amount <- c(30, 60, 90, 125, 200, 250, 300)
Time <- c(1.6178,1.7141,1.9539,2.1827,2.6227,2.7161,3.0928)
Time3 <- c(1.7704,2.0969,2.3615,2.5359,3.6506,4.0699,4.5538)
Time4 <- c(2.5763,2.7251,2.7857,3.3977,4.7343,5.7973,6.4203)
df2 <- data.frame(var0 = c(Time),
var1 = c(Time3),
var2 = c(Time4))
TimeRange = range(0, 7)
plot <- ggplot(data=df2, aes(x=Amount, y=TimeRange))
geom_line(aes( y = var0 , color="blue"))
geom_line(aes( y = var1 , color="red"))
geom_line(aes( y = var2 , color="green"))
geom_point(aes(y = var0))
geom_point(aes(y = var1))
geom_point(aes(y = var2))
scale_color_manual(name = "Legend", breaks = c("blue", "red", "green"),
values=c('blue'='blue', 'red'='red', 'green'='green'))
ggtitle("LineGraph plot")
plot
輸出：
轉載請註明出處，本文鏈接：https://www.uj5u.com/qukuanlian/443261.html
上一篇：如何添加圖例？