Proj_1_init

Projekt_1/Projekt_1.R

@@ -0,0 +1,22 @@
+#test t-studenta dla jednej próby
+load("Hamulce.RData")
+attach(Hamulce)
+mean(Wynik)
+t.test(Wynik,mu=18.6,alternative='less')
+
+# dwie próby niezależne
+load("Bledy.RData")
+attach(Bledy)
+tapply(Blad,Kod,mean)
+tapply(Blad,Kod,var)
+var.test(Blad~Kod)
+t.test(Blad~Kod,var.equal=T,alternative='less')
+
+#dwie próby zależne
+load("Cisnienie.RData")
+attach(Cisnienie)
+mean(Po-Przed)
+t.test(Po-Przed,mu=0,alternative='less')
+
+#TODO
+# trzeba narysować rozkład statystyki testowej

Projekt_1/Projekt_1.Rproj

@@ -0,0 +1,13 @@
+Version: 1.0
+
+RestoreWorkspace: Default
+SaveWorkspace: Default
+AlwaysSaveHistory: Default
+
+EnableCodeIndexing: Yes
+UseSpacesForTab: Yes
+NumSpacesForTab: 2
+Encoding: UTF-8
+
+RnwWeave: Sweave
+LaTeX: pdfLaTeX