Hoď ma hore
prihlásenie:
Registrácia  |  Zabudnuté heslo
tu sa nachádzate: hlavná stránka  filozofia  téma
kategórie:  

Ako sa naučiť analýzu po tretie

1
reakcií
730
prečítaní
Tému 15. marca 2018, 07:47 založil peter31.

podobné témy:

názov témy
posledná
reakcií
15. 03. 2018
1
 
 


1.
označiť príspevok

peter31
   15. 3. 2018, 07:47 avatar
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)


2.
označiť príspevok

gabriel pb
   15. 3. 2018, 18:19 avatar
aj hackeri majú právo na spravodlivý súd
váš príspevok

Pridávať príspevky môžu iba zaregistrovaní účastníci fóra.

Som zaregistrovaný

nick: heslo:
zostať trvalo prihlásený    
Nie som zaregistrovaný

Vaša prezývka:  

Po zaregistrovaní budete automaticky presmerovaní do tejto témy.

najnovšie príspevky na celom fóre

dnes, 00:57,  Fico dnes spominal ze zabava sa len zacina a podobnych videi typu kocner trnka Pociatek Trnka je...
dnes, 00:53,  To vas zaujima vytetovany obrazok *11 tak si to sjedeme jeste jednou po volbach 29.2.2020...
dnes, 00:48,  101 Dalmatians | Soundtrack Suite (Michael Kamen)
dnes, 00:41,  scarlet so svojími slečnami, rozdáva opäť červený riadok plný bozkov, chce bývať v o F...
dnes, 00:38,  Skarlet si tu poriadne vyšticovala našich uplakaných nacistov ktorí v slzach chcú dokazať...
dnes, 00:36,  Navyknutý na ľudí, lebo mu dávajú jesť. To nie je moc dobre. Otázka času, kedy môže...
dnes, 00:34,  Na to by mala reagovať štatna ochrana prírody a príslušne ministerstvo
dnes, 00:33,  Obyčajne sa k tomu uchylujú mladšie jedince a pestuni ....
dnes, 00:31,  To len tak? A čo na to ochranári. ....Inak na Slovensku vy sa ich počet mal trochu...
dnes, 00:29,  Perfektné detaily.
dnes, 00:29,  Lebo ich vystrielali
dnes, 00:27,  čože?? medvede žobrajúce horalky? To musí vyzerať srandovne. :)
dnes, 00:24,  Nie nebála je zvyknutá na turistov ako množstvo kamzíkov ale i niekoľko hlucháňov ale sú...
dnes, 00:23,  To je paráda.... https://thumb.mp-farm.com/39780612/preview.jpg A existuje na to nejaké...
dnes, 00:22,  Ale niekedy vie zapózovať i obyčajný vrabec...
dnes, 00:21,  V Česku medvede nežijú . Teda sem tam jeden kus prejne Táto vydra je z Rakúska s...
dnes, 00:19,  Ja nie som hakojiSS aby som sa opakoval ale pre teba . Tú lišku som fotil vo Vysokých Tatrách...
dnes, 00:17,  To sa nebála?
dnes, 00:17,  odznačíš si čo chceš prefarbiť a z modreho snehu máš biely .
dnes, 00:17,  Takže tú líšku si nefotil ty ? *06*06*06
neprehliadnite
df.sk na Facebooku
vyhľadávanie
 
Ak chceš nájsť tú pravú ženu, naprv buď tým pravým mužom.
Prevádzkuje df.sk | TOPlist
(48 459 bytes in 0,543 seconds)