Statistiliste seoste illustreerimine
  • Avaleht
  • Sissejuhatus
  • Õpijuhendid
  • Andmete sisestamine
  • Sagedustabeli analüüs
    • Tunnuse jaotuse illustreerimine>
      • Kontrollgraafik 1
    • Tingliku jaotuse graafikud>
      • Kontrollgraafik 2
    • Binaarse tunnuse tõenäosuste graafik>
      • Kontrollgraafik 3
  • Keskmiste võrdlemine
    • Keskmine piiridega>
      • Ühefaktoriline>
        • Kontrollgraafik 4
      • Kahefaktoriline>
        • Kontrollgraafik 5
    • Karp-vurrud diagramm>
      • Ühefaktoriline>
        • Kontrollgraafik 6
      • Kahe-faktoriline>
        • Kontrollgraafik 7
      • Kolme-faktoriline
  • Lineaarse seose uurimine
    • Hajuvusdiagramm ja trendijoon
    • Lineaarne regressioonijoon koos usalduspiiridega>
      • Kontrollgraafik 8
    • Lineaarne regressioon sõltuvalt diskreetsest faktorist >
      • Kontrollgraafik 9
  • Dispersioonanalüüsi mudelid
  • Veel graafikuid koos tekstiga
  • Lõpetuseks
  • Hindamine
    • R käskude test
  • Küsimuste-vastuste foorum
  • Algandmed
  • Viited-lingid
  • Rgraafikud

Proovi nii!



suguF<-factor(sugu,labels=c("mees","naine"))
terve<-as.numeric(I(tervis>0))

a<-barplot(prop.table(table(terve,suguF),2)[1,]*100,ylim=c(0,60),
main="Meeste ja naiste võrdlus", ylab="Tõenäosus mitte haigestuda, 95% usalduspiiridega",col=c("lightblue","orange"))
lim1 <- binom.test(table(terve[suguF=="mees"]))$conf.int*100
lim2 <- binom.test(table(terve[suguF=="naine"]))$conf.int*100

arrows(a, c(lim1[1], lim2[1]), 
a, c(lim1[2], lim2[2]), 
code=3, angle=90, col="gray40", lwd=2)






Tagasi
Powered by Create your own unique website with customizable templates.