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