Packages

pacman::p_load(tidyverse, 
               gtsummary, 
               janitor, 
               irr)

theme_set(theme_minimal())

Dataset

## # A tibble: 6 Ă— 8
##   Evaluador Leyda `Santa Ema` Héroes `Perez Cruz` Bicicleta `Terra Andina` Sexo 
##   <chr>     <dbl>       <dbl>  <dbl>        <dbl>     <dbl>          <dbl> <chr>
## 1 Joaquin     3           2        7            4         3              6 H    
## 2 Paula       4           4        1            5         7              5 M    
## 3 CristĂ³bal   3           4        1            5         3              4 H    
## 4 Pili        4           5        2            5         4              4 M    
## 5 Fco         4           3        3            6         7              5 H    
## 6 PapĂ¡        3.5         5.5      5            2         6              5 H

Wrangling

Evaluador Sexo Vino Puntaje
Joaquin H Leyda 3
Joaquin H Santa Ema 2
Joaquin H Héroes 7
Joaquin H Perez Cruz 4
Joaquin H Bicicleta 3
Joaquin H Terra Andina 6

Cleaning and new vars

Acuerdo entre evaluadores

##  Fleiss' Kappa for m Raters
## 
##  Subjects = 13 
##    Raters = 6 
##     Kappa = -0.101 
## 
##         z = -3.46 
##   p-value = 0.00055

Pobre acuerdo entre evaluadores

Tabla de Resultados

General por Vino

Vino n promedio sd
Terra Andina 13 5.2 1.2
Bicicleta 13 4.7 1.8
Perez Cruz 13 4.2 1.1
Leyda 13 3.7 0.7
Santa Ema 13 3.6 1.8
Héroes 13 2.8 2.4

Heroes obtuvo todo tipo de puntajes

Leyda obtuvo evaluaciones mĂ¡s similares entre distintos evaluadores

Bicicleta y Terra Andina estĂ¡n un poco por arriba del resto

Por evaluador

Evaluador n promedio sd
Fco 6 4.7 1.6
Angelita 6 4.5 1.9
PapĂ¡ 6 4.5 1.5
Paula 6 4.3 2.0
Alberto 6 4.2 1.7
Joaquin 6 4.2 1.9
Paulina 6 4.0 2.4
Pili 6 4.0 1.1
Ramon 6 4.0 2.4
MAG 6 3.5 1.9
Maida 6 3.5 1.9
Pablo 6 3.5 1.9
CristĂ³bal 6 3.3 1.4

Por sexo

Sexo n promedio sd
H 42 4 1.7
M 36 4 1.8

Hay diferencia de vino por sexo?

Vino H M
Bicicleta 4.4 5.0
Héroes 3.3 2.2
Leyda 3.4 4.2
Perez Cruz 4.1 4.2
Santa Ema 3.6 3.5
Terra Andina 5.4 4.8

Con Bicicleta o Terra Andina te vas a la segura

Heroes definitivamente no para mujeres, quizĂ¡s mĂ¡s a la segura con Bicicleta para mujeres.

Para hombres definitivamente Leyda no. Tampoco Heroes.

Las mujeres en general tienen valores mĂ¡s extremos, mientras que los hombres tienen puntuaciones mĂ¡s homogĂ©neas

Hay diferencia entre las puntuaciones de los vinos por sexo?

Characteristic Beta 95% CI1 p-value
Vino
Bicicleta — —
Héroes -1.1 -2.9, 0.57 0.2
Leyda -1.1 -2.8, 0.65 0.2
Perez Cruz -0.29 -2.0, 1.4 0.7
Santa Ema -0.79 -2.5, 0.93 0.4
Terra Andina 1.0 -0.72, 2.7 0.3
Sexo
H — —
M 0.57 -1.2, 2.4 0.5
Vino * Sexo
Héroes * M -1.7 -4.2, 0.84 0.2
Leyda * M 0.24 -2.3, 2.8 0.9
Perez Cruz * M -0.55 -3.1, 2.0 0.7
Santa Ema * M -0.71 -3.2, 1.8 0.6
Terra Andina * M -1.2 -3.7, 1.4 0.4

1 CI = Confidence Interval

Las diferencias entre sexo y vino no son significativas

Por edad

sin datos

RelaciĂ³n entre puntaje y precio

SerĂ­a ideal probar con dos vinos por rango de precio: dos baratos, dos medianos y dos caros