Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
data_2016-saa.docx
Скачиваний:
0
Добавлен:
01.07.2025
Размер:
246.56 Кб
Скачать

1.026586 2.009046 1.971255 2.073800 #Получили коэффициенты модели

Прогноз для графика вычисляем, используя коэффициенты модели и данные

p<-read.table("task-6.6-01.dat",header=T)

M.coef<-coef(M.ridge)

y.prd<-M.coef[1] + as.matrix(p[,1:3]) %*% M.coef[-1]

plot(y.prd,p$y,main="",xlab="Прогноз",ylab="данные",pch=20,cex=2)

abline(0,1,lwd=3)

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]