重ね書き
よく忘れる
重ね書きをよく忘れるので、簡単な事例を書いておく。
ソース
# 重ね書き library(ggplot2) x <- -10:10 # 係数 a <- 0.5 b <- 1.0 # 線形関数 linear <- a * x + b # 2次関数 quadratic <- (x - a)^2 + b # data.frameに入れる result <- data.frame(x,linear,quadratic) # 可視化 ggplot(result, aes(x)) + # x軸 geom_line(aes(y = linear, colour = "Linear")) + geom_line(aes(y = quadratic, colour = "Quadratic"))