thr3ads.net - R help es - [R-es] Friedman [Dec 2019]

If this information is useful, please help other people find it:
Share via:

Jose Betancourt B.

2019-Dec-11 13:10 UTC

[R-es] Friedman

Estimados

Este es el test de friedman que se logra asi

library(PMCMR)
y <- matrix(c( 3.88, 5.64, 5.76, 4.25, 5.91, 4.33, 30.58, 30.14, 16.92,
  23.19, 26.74, 10.91, 25.24, 33.52, 25.45, 18.85, 20.45,
  26.67, 4.44, 7.94, 4.04, 4.4, 4.23, 4.36, 29.41, 30.72,
  32.92, 28.23, 23.35, 12, 38.87, 33.12, 39.15, 28.06, 38.23,
  26.65),nrow=6, ncol=6,
  dimnames=list(1:6,LETTERS[1:6]))
print(y)
friedman.test(y)
durbin.test(y)

RESULTADO
Friedman rank sum test
data:  y
Friedman chi-squared = 23.333, df = 5, p-value = 0.0002915
> durbin.test(y)	Durbin rank sum test
data:  y
Durbin chi-squared = 23.333, df = 5, p-value = 0.0002915

==============================Me pregunto porque no obtengo ese resultado al
copiar en clipboard
estos datos o al leerlos desde excel



 A     B     C    D     E     F
3.88 30.58 25.24 4.44 29.41 38.87
 5.64 30.14 33.52 7.94 30.72 33.12
 5.76 16.92 25.45 4.04 32.92 39.15
 4.25 23.19 18.85 4.40 28.23 28.06
 5.91 26.74 20.45 4.23 23.35 38.23
6 4.33 10.91 26.67 4.36 12.00 26.65

y <- read.table("clipboard", header = TRUE)
y

Me da esta información
friedman.test(y)
Error in friedman.test.default(y) :
  argument "groups" is missing, with no default

EN RESUMEN QUISIERA LEER ESTOS DATOS DESDE EXCEL, CSV , TXT O
CLIPBOARD Y QUE ME HAGA EL ANÁLISIS

Saludos
José

José Trujillo Carmona

2019-Dec-11 13:23 UTC

head link

[R-es] Friedman

En la tabla inferior se ha colado un "6" al inicio de la fila, por eso
al copia y pegar no se lee correctamente.

En la orden:
> y <- matrix(c( 3.88, 5.64, 5.76, 4.25, 5.91, 4.33, 30.58, 30.14, 16.92,
>    23.19, 26.74, 10.91, 25.24, 33.52, 25.45, 18.85, 20.45,
>    26.67, 4.44, 7.94, 4.04, 4.4, 4.23, 4.36, 29.41, 30.72,
>    32.92, 28.23, 23.35, 12, 38.87, 33.12, 39.15, 28.06, 38.23,
>    26.65),nrow=6, ncol=6,
>    dimnames=list(1:6,LETTERS[1:6]))
Después del 4.33 aparece el 30.58 (inicio de la segunda columna)

En la tabla:

  A     B     C    D     E     F
3.88 30.58 25.24 4.44 29.41 38.87
  5.64 30.14 33.52 7.94 30.72 33.12
  5.76 16.92 25.45 4.04 32.92 39.15
  4.25 23.19 18.85 4.40 28.23 28.06
  5.91 26.74 20.45 4.23 23.35 38.23
6 4.33 10.91 26.67 4.36 12.00 26.65

Hay un seis adicional al pie de la primera columna, en una especie de 
columna 0 fantasma.

Saludos.


El 11/12/19 a las 14:10, Jose Betancourt B. escribió:> Estimados
>
> Este es el test de friedman que se logra asi
>
> library(PMCMR)
> y <- matrix(c( 3.88, 5.64, 5.76, 4.25, 5.91, 4.33, 30.58, 30.14, 16.92,
>    23.19, 26.74, 10.91, 25.24, 33.52, 25.45, 18.85, 20.45,
>    26.67, 4.44, 7.94, 4.04, 4.4, 4.23, 4.36, 29.41, 30.72,
>    32.92, 28.23, 23.35, 12, 38.87, 33.12, 39.15, 28.06, 38.23,
>    26.65),nrow=6, ncol=6,
>    dimnames=list(1:6,LETTERS[1:6]))
> print(y)
> friedman.test(y)
> durbin.test(y)
>
> RESULTADO
> Friedman rank sum test
> data:  y
> Friedman chi-squared = 23.333, df = 5, p-value = 0.0002915
>
>> durbin.test(y)
> 	Durbin rank sum test
> data:  y
> Durbin chi-squared = 23.333, df = 5, p-value = 0.0002915
>
> ==============================> Me pregunto porque no obtengo ese
resultado al copiar en clipboard
> estos datos o al leerlos desde excel
>
>
>
>   A     B     C    D     E     F
> 3.88 30.58 25.24 4.44 29.41 38.87
>   5.64 30.14 33.52 7.94 30.72 33.12
>   5.76 16.92 25.45 4.04 32.92 39.15
>   4.25 23.19 18.85 4.40 28.23 28.06
>   5.91 26.74 20.45 4.23 23.35 38.23
> 6 4.33 10.91 26.67 4.36 12.00 26.65
>
> y <- read.table("clipboard", header = TRUE)
> y
>
> Me da esta información
> friedman.test(y)
> Error in friedman.test.default(y) :
>    argument "groups" is missing, with no default
>
> EN RESUMEN QUISIERA LEER ESTOS DATOS DESDE EXCEL, CSV , TXT O
> CLIPBOARD Y QUE ME HAGA EL ANÁLISIS
>
> Saludos
> José
>
> _______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es

José Trujillo Carmona

2019-Dec-11 13:33 UTC

head link

[R-es] Friedman

Una vez corregido el error de la última fila, el procedimiento funciona:

 > y <- read.table("clipboard", header = TRUE)

 > friedman.test(as.matrix(y))

     Friedman rank sum test

data:  as.matrix(y)
Friedman chi-squared = 23.333, df = 5, p-value = 0.0002915

Hay que tener en cuenta que el test de friedman admite dos forma de 
entrada de los datos, bien mediante la definición de grupos y bloques o 
bien mediante una matriz en la que las columnas son los niveles del 
factor (grupos) y las filas son los bloques:

## Default S3 method:
friedman.test(y, groups, blocks, ...)
... ...
groups: a vector giving the group for the corresponding elements of y if this is
a vector; ignored if y is a matrix.

read.table crea un dataframe, no una matriz.

Saludos

El 11/12/19 a las 14:10, Jose Betancourt B. escribió:> Estimados
>
> Este es el test de friedman que se logra asi
>
> library(PMCMR)
> y <- matrix(c( 3.88, 5.64, 5.76, 4.25, 5.91, 4.33, 30.58, 30.14, 16.92,
>    23.19, 26.74, 10.91, 25.24, 33.52, 25.45, 18.85, 20.45,
>    26.67, 4.44, 7.94, 4.04, 4.4, 4.23, 4.36, 29.41, 30.72,
>    32.92, 28.23, 23.35, 12, 38.87, 33.12, 39.15, 28.06, 38.23,
>    26.65),nrow=6, ncol=6,
>    dimnames=list(1:6,LETTERS[1:6]))
> print(y)
> friedman.test(y)
> durbin.test(y)
>
> RESULTADO
> Friedman rank sum test
> data:  y
> Friedman chi-squared = 23.333, df = 5, p-value = 0.0002915
>
>> durbin.test(y)
> 	Durbin rank sum test
> data:  y
> Durbin chi-squared = 23.333, df = 5, p-value = 0.0002915
>
> ==============================> Me pregunto porque no obtengo ese
resultado al copiar en clipboard
> estos datos o al leerlos desde excel
>
>
>
>   A     B     C    D     E     F
> 3.88 30.58 25.24 4.44 29.41 38.87
>   5.64 30.14 33.52 7.94 30.72 33.12
>   5.76 16.92 25.45 4.04 32.92 39.15
>   4.25 23.19 18.85 4.40 28.23 28.06
>   5.91 26.74 20.45 4.23 23.35 38.23
> 6 4.33 10.91 26.67 4.36 12.00 26.65
>
> y <- read.table("clipboard", header = TRUE)
> y
>
> Me da esta información
> friedman.test(y)
> Error in friedman.test.default(y) :
>    argument "groups" is missing, with no default
>
> EN RESUMEN QUISIERA LEER ESTOS DATOS DESDE EXCEL, CSV , TXT O
> CLIPBOARD Y QUE ME HAGA EL ANÁLISIS
>
> Saludos
> José
>
> _______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
	[[alternative HTML version deleted]]

Jose Betancourt B.

2019-Dec-11 13:34 UTC

head link

[R-es] Friedman

Estimado, eliminé el 6 que sobra y sigue dando el mismo resultado

El 11/12/19, José Trujillo Carmona <trujillo en unex.es>
escribió:> En la tabla inferior se ha colado un "6" al inicio de la fila,
por eso
> al copia y pegar no se lee correctamente.
>
> En la orden:
>
>> y <- matrix(c( 3.88, 5.64, 5.76, 4.25, 5.91, 4.33, 30.58, 30.14,
16.92,
>>    23.19, 26.74, 10.91, 25.24, 33.52, 25.45, 18.85, 20.45,
>>    26.67, 4.44, 7.94, 4.04, 4.4, 4.23, 4.36, 29.41, 30.72,
>>    32.92, 28.23, 23.35, 12, 38.87, 33.12, 39.15, 28.06, 38.23,
>>    26.65),nrow=6, ncol=6,
>>    dimnames=list(1:6,LETTERS[1:6]))
>
> Después del 4.33 aparece el 30.58 (inicio de la segunda columna)
>
> En la tabla:
>
>   A     B     C    D     E     F
> 3.88 30.58 25.24 4.44 29.41 38.87
>   5.64 30.14 33.52 7.94 30.72 33.12
>   5.76 16.92 25.45 4.04 32.92 39.15
>   4.25 23.19 18.85 4.40 28.23 28.06
>   5.91 26.74 20.45 4.23 23.35 38.23
> 6 4.33 10.91 26.67 4.36 12.00 26.65
>
> Hay un seis adicional al pie de la primera columna, en una especie de
> columna 0 fantasma.
>
> Saludos.
>
>
> El 11/12/19 a las 14:10, Jose Betancourt B. escribió:
>> Estimados
>>
>> Este es el test de friedman que se logra asi
>>
>> library(PMCMR)
>> y <- matrix(c( 3.88, 5.64, 5.76, 4.25, 5.91, 4.33, 30.58, 30.14,
16.92,
>>    23.19, 26.74, 10.91, 25.24, 33.52, 25.45, 18.85, 20.45,
>>    26.67, 4.44, 7.94, 4.04, 4.4, 4.23, 4.36, 29.41, 30.72,
>>    32.92, 28.23, 23.35, 12, 38.87, 33.12, 39.15, 28.06, 38.23,
>>    26.65),nrow=6, ncol=6,
>>    dimnames=list(1:6,LETTERS[1:6]))
>> print(y)
>> friedman.test(y)
>> durbin.test(y)
>>
>> RESULTADO
>> Friedman rank sum test
>> data:  y
>> Friedman chi-squared = 23.333, df = 5, p-value = 0.0002915
>>
>>> durbin.test(y)
>> 	Durbin rank sum test
>> data:  y
>> Durbin chi-squared = 23.333, df = 5, p-value = 0.0002915
>>
>> ==============================>> Me pregunto porque no obtengo
ese resultado al copiar en clipboard
>> estos datos o al leerlos desde excel
>>
>>
>>
>>   A     B     C    D     E     F
>> 3.88 30.58 25.24 4.44 29.41 38.87
>>   5.64 30.14 33.52 7.94 30.72 33.12
>>   5.76 16.92 25.45 4.04 32.92 39.15
>>   4.25 23.19 18.85 4.40 28.23 28.06
>>   5.91 26.74 20.45 4.23 23.35 38.23
>> 6 4.33 10.91 26.67 4.36 12.00 26.65
>>
>> y <- read.table("clipboard", header = TRUE)
>> y
>>
>> Me da esta información
>> friedman.test(y)
>> Error in friedman.test.default(y) :
>>    argument "groups" is missing, with no default
>>
>> EN RESUMEN QUISIERA LEER ESTOS DATOS DESDE EXCEL, CSV , TXT O
>> CLIPBOARD Y QUE ME HAGA EL ANÁLISIS
>>
>> Saludos
>> José
>>
>> _______________________________________________
>> R-help-es mailing list
>> R-help-es en r-project.org
>> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
> _______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>

-- 
Dr. Jose A. Betancourt Bethencourt
Universidad de Ciencias Medicas Carlos j. Finlay

Apparently Analagous Threads

Search for more reasonably related threads

R help es - Dec 2019 - Friedman

[R-es] Friedman

[R-es] Friedman

[R-es] Friedman

[R-es] Friedman

Apparently Analagous Threads