hoď ma hore
Milí diskutujúci. Pri diskutovaní prosím: 1. nepridávaj témy pozostávajúce len z odkazov alebo jednoslovné témy / 2. nepridávaj uražlivé alebo vulgárne komentáre. Ak tieto pravidlá nedodržíš, tvoja téma pravdepodobne skončí v koši. Príjemné diskutovanie :)
Ako sa naučiť analýzu po tretie
príspevkov 1 |
zobrazení 0 |
tému vytvoril(a) 15.3.2018 07:47
posledná zmena 15.3.2018 07:47
|
1
|
data(iris)
setosa <- iris[iris$Species == "setosa",]
attach(setosa)
plot(Petal.Length, Petal.Width)
petal_lm <- lm(Petal.Width ~ Petal.Length)
abline(petal_lm)
summary(petal_lm)
hist(residuals(petal_lm))
deviance(petal_lm)
predict(petal_lm, newdata = data.frame(Petal.Length=6),
interval="prediction")
predictions <- predict(petal_lm, newdata = setosa, interval="prediction")
plot(Petal.Length, Petal.Width)
lines(predictions[,1] ~ setosa, col=1)
lines(predictions[,2] ~ setosa, col=1, lty=2)
lines(predictions[,3] ~ setosa, col=1, lty=2)
detach(setosa)
versicol=iris[iris$Species=='versicolor',]
attach(versicol)
versi_lm=lm(Petal.Width ~ Petal.Length)
predict(petal_lm, newdata = data.frame(Petal.Length=6),
interval="prediction")
summary(versi_lm)
rozsireny=lm(Petal.Width ~ Petal.Length+Sepal.Width)
summary(rozsireny)
cele=iris
detach(versicol)
attach(cele)
model=lm(Petal.Width ~ Petal.Length+Species)
summary(model)
x1=runif(50,1,10)
x2=runif(50,1,10)
x3=runif(50,1,10)
y=0.5+2*x1+1.5*x2+x3+x4
sum=rnorm(length(y),0,0.5)
predx1=lm(y~x1)
predx2=lm(y~x2)
predx3=lm(y~x3)
summary(predx3)
residuals(predx3)
x4=2*x1
predx4=lm(y~x1+x4+x2+x3)
summary(predx4)
cor(x1,x4)
predx5=lm(y~x4+x2+x3)
summary(predx5)
|
|
|
|
prevádzkuje diskusneforum.sk
kontaktuj správcu diskusného fóra
vytvoril dzI/O 2023 - 2024
veľkosť : 79 357 B
vygenerované za : 0.097 s
unikátne zobrazenia tém : 36 433
unikátne zobrazenia blogov : 543
táto stránka musí používať koláčiky, aby mohla fungovať...
|
možnosti
hlavná stránka
nastavenia
blogy
todo
hľadanie :
blog dňa :
odkaz Šialené zhony alebo pokoj, stromček, pod stromčekom darčeky a ľudia, ktorí sú nejakým spôsobom k sebe viazaní spolu pokope v strese či radosti... A ešte narodeniny... Pre niekoho skut...
citát dňa :
Medzi mužmi a ženami nie je rozdiel. Rozdiel je len medzi dobrými a zlými ľudmi.
|