```{r} x <- runif(1000, 0, pi) y <- sin(x) ggplot() + geom_line(aes(x = x, y = y)) + geom_segment(aes(x = 0, xend = 0, y = 0, yend = 1), color = 'blue') + ...
確定! 回上一頁