Мауриц Эверс задает хороший вопрос. Вы хотите модель? Затем выполните:
dat <- data.frame("year" = c(2000, 2001, 2002, 2003, 2004),
"population" = c(4779736,4780138,4798834,5168993,5052356))
model <- lm(population ~ year, data = dat)
Но вы просите сюжет, и есть решение с ggplot2
:
library(ggplot2)
ggplot(aes(x = years, y = population), data = dat) +
geom_point() +
geom_smooth(method = "lm")
geom_smooth()
соответствует модели линейной регрессии для ваших данных, вставляет линию регрессии, а также ленту для отображения доверительных интервалов.
Может быть, это то, что вы ищете.
* +1012 *