Pruebas de Steven
df=read.csv("datosSteven.csv",sep=";")
df
## Finca Dias T Puntaje
## 1 Corpachi 3.0 20.6 86.63000
## 2 Corpachi 4.0 20.6 86.06000
## 3 Corpachi 5.0 20.6 86.88000
## 4 Corpachi 7.0 20.6 87.19000
## 5 Corpachi 9.0 20.6 87.34000
## 6 Corpachi 3.0 24.0 86.28000
## 7 Corpachi 4.0 24.0 87.13000
## 8 Corpachi 5.0 24.0 87.09000
## 9 Corpachi 6.0 24.0 85.94000
## 10 Corpachi 7.0 24.0 85.79000
## 11 Corpachi 3.0 30.0 86.32000
## 12 Corpachi 4.0 30.0 84.93000
## 13 Corpachi 5.0 30.0 86.21000
## 14 Corpachi 5.5 30.0 88.49000
## 15 Corpachi 6.0 30.0 86.39000
## 16 Corpachi 6.5 30.0 86.61000
## 17 Lamastus 3.0 24.0 88.56000
## 18 Lamastus 4.0 24.0 88.53000
## 19 Lamastus 5.0 24.0 89.22000
## 20 Lamastus 6.0 24.0 89.00000
## 21 Lamastus 7.0 24.0 88.92000
## 22 Lamastus 8.0 24.0 88.69000
## 23 Lamastus 3.0 17.4 88.67000
## 24 Lamastus 4.0 17.4 89.31000
## 25 Lamastus 5.0 17.4 89.06000
## 26 Lamastus 7.0 17.4 88.78000
## 27 Lamastus 9.0 17.4 89.11000
## 28 Lamastus 11.0 17.4 89.39000
## 29 Lamastus 4.0 30.0 89.17000
## 30 Lamastus 5.0 30.0 89.06000
## 31 Lamastus 5.5 30.0 88.72000
## 32 Lamastus 6.0 30.0 89.08000
## 33 Lamastus 6.5 30.0 88.94000
## 34 Lamastus 7.0 30.0 89.22000
## 35 Nuguo 0.0 24.0 88.10000
## 36 Nuguo 0.0 24.0 88.61000
## 37 Nuguo 3.0 24.0 88.64000
## 38 Nuguo 4.0 24.0 88.53000
## 39 Nuguo 5.0 24.0 88.83000
## 40 Nuguo 6.0 24.0 88.69000
## 41 Nuguo 7.0 24.0 88.89000
## 42 Nuguo 4.0 16.8 88.75000
## 43 Nuguo 5.0 16.8 88.64000
## 44 Nuguo 7.0 16.8 88.86000
## 45 Nuguo 11.0 16.8 88.11000
## 46 Nuguo 3.0 30.0 88.83000
## 47 Nuguo 4.0 30.0 89.28000
## 48 Nuguo 5.0 30.0 89.36000
## 49 Nuguo 6.0 30.0 89.52000
## 50 Nuguo 6.5 30.0 89.44000
## 51 Hartman 3.0 22.0 89.44000
## 52 Hartman 4.0 22.0 88.81000
## 53 Hartman 5.0 22.0 88.17000
## 54 Hartman 6.0 22.0 88.61000
## 55 Hartman 7.0 22.0 89.31000
## 56 Hartman 8.0 22.0 89.39000
## 57 Hartman 3.0 24.0 89.06000
## 58 Hartman 4.0 24.0 89.00000
## 59 Hartman 5.0 24.0 89.14000
## 60 Hartman 6.0 24.0 89.00000
## 61 Hartman 8.0 24.0 88.86000
## 62 Hartman 9.0 24.0 88.72000
## 63 Hartman 3.0 30.0 88.81000
## 64 Hartman 4.0 30.0 87.90125
## 65 Hartman 5.0 30.0 88.58000
## 66 Hartman 5.5 30.0 88.56000
## 67 Hartman 6.0 30.0 87.90125
## 68 Hartman 6.5 30.0 88.72000
boxplot(Puntaje~Finca,col=c("blue","green","red","yellow"),data=df)

x1=c(2,3,5,1,6)
x2=c(7,8,5,9,4)
t.test(x1,x2)
##
## Welch Two Sample t-test
##
## data: x1 and x2
## t = -2.44, df = 8, p-value = 0.04057
## alternative hypothesis: true difference in means is not equal to 0
## 95 percent confidence interval:
## -6.2242961 -0.1757039
## sample estimates:
## mean of x mean of y
## 3.4 6.6
modelo=aov(Puntaje~Finca,data=df)
summary(modelo)
## Df Sum Sq Mean Sq F value Pr(>F)
## Finca 3 63.72 21.241 80.86 <2e-16 ***
## Residuals 64 16.81 0.263
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1