dat <- gamSim(4, n = 400, dist = "normal", scale = 1) ... ggplot(dat, aes(x = f1, y = y)) + geom_point(size = 1.5) + ggtitle("y versus f1:") ...
確定! 回上一頁