Re: [R-es] Cambiar el intervalo de confianza en un anova

2023-11-22 Thread Relloso Barrio, Juan Bautista 
Efectivamente, tienes razón.
Muchísimas gracias por tú respuesta y por tus aclaraciones.
 Un saludo.
Juan Bautista Relloso Barrio
Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
Departamento de Producción Vegetal 
Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare Ekoizpen 
Departamentua 
jbauti...@neiker.eus | M. 688 62 98 14 
www.neiker.eus          
  

PRIBATUTASUN POLITIKA | POLÍTICA DE PRIVACIDAD | LEGAL NOTICE
 


-Mensaje original-
De: R-help-es  En nombre de Proyecto R-UCA
Enviado el: martes, 21 de noviembre de 2023 16:37
Para: r-help-es@r-project.org
Asunto: Re: [R-es] Cambiar el intervalo de confianza en un anova

Buenas,

En R, como en la mayoría del software estadístico, no se utiliza ningún nivel 
de confianza sino que lo que se calcula es el p-valor asociado al contraste. De 
forma que cuanto más cerca de 0 esté el p-valor "menos credibilidad le damos a 
la hipótesis nula". Dicho mejor, debemos rechazar la hipótesis nula si el 
p-valor está por debajo de nuestro nivel de confianza.

Por ejemplo, la primera línea del ejemplo:
   Df Sum Sq Mean Sq F value Pr(>F)   
TRAT 6 0.0028 0.00046   0.777  0.590   

El p-valor es el número que aparece en la última columna, es decir, para este 
contraste tenemos un p-valor de 0.590, esto es mayor que cualquiera de los 
niveles de confianza que se utilizan habitualmente y, por tanto, la hipótesis 
nula nunca se va a rechazar.

Pero ¿cuál es la hipótesis nula? Cuando se trata de un parámetro la hipótesis 
nula es que el parámetro es 0, en este caso los parámetros son los efectos de 
los tratamientos, es decir, la hipótesis nula es que los tratamientos no tienen 
efecto. Dado que no la hemos rechazado, la conclusión es que no se puede 
rechazar la hipótesis de que los tratamiento no tiene efecto. Aunque es 
incorrecto, en este caso, la gente suele decir que se acepta la hipótesis de 
que los tratamientos no tienen efectos diferentes.

Todos los p-valores se interpretan igual.

Un saludo.

P.D.: Esto no es una pregunta de R, es una pregunta de estadística.

--
--
http://knuth.uca.es/R
--
Proyecto R-UCA
--
Nombre: Manuel Muñoz Márquez
Departamento: Departamento de Estadística e Investigación Operativa
Institución: Escuela Superior de Ingeniería
Organización: Universidad de Cádiz
--


El mar, 21-11-2023 a las 12:43 +0000, Relloso Barrio, Juan Bautista escribió:
> Gracias Carlos.
> Yo también he visto el ejemplo que te pone chatGPT, pero la salida que te da 
> no soy capaz de interpretarla.
> Os paso las ordenes y las respuestas de R de la propuesta de chatGPT
>  
> Ejemplo.aov<- aov(P~TRAT+CORTE+REP)
> > summary (Ejemplo.aov)
>    Df Sum Sq Mean Sq F value Pr(>F)   
> TRAT 6 0.0028 0.00046   0.777  0.590   
> CORTE    2 0.5022 0.25110 424.542 <2e-16 ***
> REP  4 0.0026 0.00066   1.117  0.353   
> Residuals   92 0.0544 0.00059  
> ---
> Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
> > confianza_nueva <- 0.85
> > intervalos_confianza <- confint(Ejemplo.aov, level = confianza_nueva)
> > print(intervalos_confianza)
>    7.5 %    92.5 %
> (Intercept)  0.211291874  0.2361366979
> TRATCP  -0.022891346  0.0028913463
> TRATCPR -0.007558013  0.0182246797
> TRATCR  -0.008224680  0.0175580130
> TRATP   -0.007558013  0.0182246797
> TRATR   -0.011558013  0.0142246797
> TRATT   -0.008224680  0.0175580130
> CORTEC2 -0.065010796 -0.0481320614
> CORTEC3 -0.175010796 -0.1581320614
> REP2    -0.022323748 -0.0005333952
> REP3    -0.019466605  0.0023237476
> REP4    -0.025180890 -0.0033905381
> REP5    -0.023276129 -0.0014857762
>  
> He puesto 0,85 porque me piden una significación del 0.15%
> Ya me diréis.
>  Un saludo.
> Juan Bautista Relloso Barrio
> Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
> Departamento de Producción Vegetal
> Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare 
> Ekoizpen Departamentua
> jbauti...@neiker.eus| M. 688 62 98 14
> www.neiker.eus          
> ej_ekonomia_garapen_lateral  
> https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg
>  
> PRIBATUTASUN POLITIKA | POLÍTICA DE PRIVACIDAD | LEGAL NOTICE
>  
>  
>  
> De: Carlos Ortega  
> Enviado el: martes, 21 de noviembre de 2023 12:05
> Para: Relloso Barrio, Juan Bautista 
> CC: r-help-es@r-project.org
> Asunto: Re: [R-es] Cambiar el intervalo de confi

[R-es] Cambiar el intervalo de confianza en un anova

2023-11-20 Thread Relloso Barrio, Juan Bautista 
Buenos días.
Normalmente por defecto, todos los ANOVAS (análisis de varianza) que he 
realizado han sido con un intervalo de confianza del 95%.
¿Cuál sería la orden que debería introducir si deseo modificar ese 95% y, por 
ejemplo, bajarlo a un 90%?
Muchas gracias.
 Un saludo.
Juan Bautista Relloso Barrio
Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
Departamento de Producción Vegetal
Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare Ekoizpen 
Departamentua
jbauti...@neiker.eus <mailto:jbauti...@neiker.eus> | M. 688 62 98 14
www.neiker.eus<http://www.neiker.eus/>
[cid:image001.png@01DA1C57.393B21C0] <https://www.linkedin.com/company/neiker/> 
 [cid:image002.png@01DA1C57.393B21C0] <https://twitter.com/neiker_BRTA> 
[cid:image003.png@01DA1C57.393B21C0] <https://www.facebook.com/neikerBRTA>  
[cid:image004.png@01DA1C57.393B21C0] <https://www.youtube.com/user/neikertec>
[cid:image005.png@01DA1C57.393B21C0][ej_ekonomia_garapen_lateral]   

[https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg]

PRIBATUTASUN POLITIKA<https://neiker.eus/eu/pribatutasun-politika/> | POLÍTICA 
DE PRIVACIDAD<https://neiker.eus/es/politica-privacidad/> | LEGAL 
NOTICE<https://neiker.eus/en/privacy-policy/>



De: R-help-es  En nombre de Relloso Barrio, 
Juan Bautista
Enviado el: miércoles, 11 de octubre de 2023 10:32
Para: r-help-es@r-project.org
Asunto: Re: [R-es] Hacer un Split plot

Buenos días.
Perdón por insistir. Quiero hacer un ANOVA para unos datos que tienen un diseño 
Split plot.
Y estoy utilizando dos editores diferentes, que, si todo fuera correcto y ya 
que toman los mismos datos, me debería dar el mismo resultado, … pero no es así.
Querría saber si básicamente los dos hacen un análisis de varianza SPLIT PLOT 
?. Y el mismo análisis?
Los comandos que doy son estos:
CEPAS, es el nombre del archivo de datos.
model<-with(CEPAS, sp.plot(REP, CEPA, VARIEDAD, trAUDPC))
Y el otro es este
model2.aov<- aov(trAUDPC~CEPA*VARIEDAD+REP+Error(REP/CEPA))

 Un saludo.
Juan Bautista Relloso Barrio
Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
Departamento de Producción Vegetal
Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare Ekoizpen 
Departamentua
jbauti...@neiker.eus <mailto:jbauti...@neiker.eus> | M. 688 62 98 14
www.neiker.eus<http://www.neiker.eus/>
[cid:image001.png@01DA1C57.393B21C0] <https://www.linkedin.com/company/neiker/> 
 [cid:image002.png@01DA1C57.393B21C0] <https://twitter.com/neiker_BRTA> 
[cid:image003.png@01DA1C57.393B21C0] <https://www.facebook.com/neikerBRTA>  
[cid:image004.png@01DA1C57.393B21C0] <https://www.youtube.com/user/neikertec>
[cid:image005.png@01DA1C57.393B21C0][ej_ekonomia_garapen_lateral]   

[https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg]

PRIBATUTASUN POLITIKA<https://neiker.eus/eu/pribatutasun-politika/> | POLÍTICA 
DE PRIVACIDAD<https://neiker.eus/es/politica-privacidad/> | LEGAL 
NOTICE<https://neiker.eus/en/privacy-policy/>



De: R-help-es 
mailto:r-help-es-boun...@r-project.org>> En 
nombre de Relloso Barrio, Juan Bautista
Enviado el: viernes, 22 de septiembre de 2023 16:18
Para: r-help-es@r-project.org<mailto:r-help-es@r-project.org>
Asunto: [R-es] no encuentro el error

Buenas tardes.
Intento hacer la separación de medias “por tratamientos”
Pero me da un error que no consigo corregir. No sé que hago mal. Os paso los 
comandos y el error

# Separación de medias HSD por Tratamiento No funciona
by(, $TRAT, function(x) {
  anova_result <- aov(RTOSE ~ CORTE, data = x)
  HSD_result <- HSD.test(anova_result)
  Tratamiento <- unique(x$TRAT)
  return(list(Tratamiento = TRAT, HSD_result = HSD_result))
})
Y el error es este:
Error in pmatch(trt, names(A)) :
argument "trt" is missing, with no default

 Un saludo.
Juan Bautista Relloso Barrio
Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
Departamento de Producción Vegetal
Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare Ekoizpen 
Departamentua
jbauti...@neiker.eus <mailto:jbauti...@neiker.eus> | M. 688 62 98 14
www.neiker.eus<http://www.neiker.eus/>
[cid:image001.png@01DA1C57.393B21C0] <https://www.linkedin.com/company/neiker/> 
 [cid:image002.png@01DA1C57.393B21C0] <https://twitter.com/neiker_BRTA> 
[cid:image003.png@01DA1C57.393B21C0] <https://www.facebook.com/neikerBRTA>  
[cid:image004.png@01DA1C57.393B21C0] <https://www.youtube.com/user/neikertec>
[cid:image005.png@01DA1C57.393B21C0][ej_ekonomia_garapen_lateral]   

[https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg]

PR

Re: [R-es] Hacer un Split plot

2023-10-11 Thread Relloso Barrio, Juan Bautista 
Buenos días.
Perdón por insistir. Quiero hacer un ANOVA para unos datos que tienen un diseño 
Split plot.
Y estoy utilizando dos editores diferentes, que, si todo fuera correcto y ya 
que toman los mismos datos, me debería dar el mismo resultado, … pero no es así.
Querría saber si básicamente los dos hacen un análisis de varianza SPLIT PLOT 
?. Y el mismo análisis?
Los comandos que doy son estos:
CEPAS, es el nombre del archivo de datos.
model<-with(CEPAS, sp.plot(REP, CEPA, VARIEDAD, trAUDPC))
Y el otro es este
model2.aov<- aov(trAUDPC~CEPA*VARIEDAD+REP+Error(REP/CEPA))

 Un saludo.
Juan Bautista Relloso Barrio
Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
Departamento de Producción Vegetal
Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare Ekoizpen 
Departamentua
jbauti...@neiker.eus <mailto:jbauti...@neiker.eus> | M. 688 62 98 14
www.neiker.eus<http://www.neiker.eus/>
[cid:image001.png@01D9FC2D.E9B85580] <https://www.linkedin.com/company/neiker/> 
 [cid:image002.png@01D9FC2D.E9B85580] <https://twitter.com/neiker_BRTA> 
[cid:image003.png@01D9FC2D.E9B85580] <https://www.facebook.com/neikerBRTA>  
[cid:image004.png@01D9FC2D.E9B85580] <https://www.youtube.com/user/neikertec>
[cid:image005.png@01D9FC2D.E9B85580][ej_ekonomia_garapen_lateral]   

[https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg]

PRIBATUTASUN POLITIKA<https://neiker.eus/eu/pribatutasun-politika/> | POLÍTICA 
DE PRIVACIDAD<https://neiker.eus/es/politica-privacidad/> | LEGAL 
NOTICE<https://neiker.eus/en/privacy-policy/>



De: R-help-es 
mailto:r-help-es-boun...@r-project.org>> En 
nombre de Relloso Barrio, Juan Bautista
Enviado el: viernes, 22 de septiembre de 2023 16:18
Para: r-help-es@r-project.org<mailto:r-help-es@r-project.org>
Asunto: [R-es] no encuentro el error

Buenas tardes.
Intento hacer la separación de medias “por tratamientos”
Pero me da un error que no consigo corregir. No sé que hago mal. Os paso los 
comandos y el error

# Separación de medias HSD por Tratamiento No funciona
by(, $TRAT, function(x) {
  anova_result <- aov(RTOSE ~ CORTE, data = x)
  HSD_result <- HSD.test(anova_result)
  Tratamiento <- unique(x$TRAT)
  return(list(Tratamiento = TRAT, HSD_result = HSD_result))
})
Y el error es este:
Error in pmatch(trt, names(A)) :
argument "trt" is missing, with no default

 Un saludo.
Juan Bautista Relloso Barrio
Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
Departamento de Producción Vegetal
Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare Ekoizpen 
Departamentua
jbauti...@neiker.eus <mailto:jbauti...@neiker.eus> | M. 688 62 98 14
www.neiker.eus<http://www.neiker.eus/>
[cid:image001.png@01D9FC2D.E9B85580] <https://www.linkedin.com/company/neiker/> 
 [cid:image002.png@01D9FC2D.E9B85580] <https://twitter.com/neiker_BRTA> 
[cid:image003.png@01D9FC2D.E9B85580] <https://www.facebook.com/neikerBRTA>  
[cid:image004.png@01D9FC2D.E9B85580] <https://www.youtube.com/user/neikertec>
[cid:image005.png@01D9FC2D.E9B85580][ej_ekonomia_garapen_lateral]   

[https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg]

PRIBATUTASUN POLITIKA<https://neiker.eus/eu/pribatutasun-politika/> | POLÍTICA 
DE PRIVACIDAD<https://neiker.eus/es/politica-privacidad/> | LEGAL 
NOTICE<https://neiker.eus/en/privacy-policy/>



De: Carlos Ortega mailto:c...@qualityexcellence.es>>
Enviado el: lunes, 18 de septiembre de 2023 23:04
Para: Relloso Barrio, Juan Bautista 
mailto:jbauti...@neiker.eus>>
CC: r-help-es@r-project.org<mailto:r-help-es@r-project.org>
Asunto: Re: [R-es] Boxplot ordenados...

Hola Juan,

Sí, te recomiendo que uses la librería "ggeasy" que simplifica mucho estas 
modificaciones, mejor que trabajar directamente con "ggplot".
Sería así:

#-
library(ggeasy)

ggplot(data = AÑOS, aes(x = VARIEDAD, y = rAUDPCor, colour = ANO,
 group = ANO)) +
  stat_summary(fun = mean, geom = "point") +
  stat_summary(fun = mean, geom = "line") +
  labs(y  =  'mean rAUDPCor') +
  labs(x  =  'Variety') +
  theme_bw() +
easy_rotate_x_labels( angle = 90)

#


Gracias,
Carlos Ortega
www.qualityexcellence.es<http://www.qualityexcellence.es>

El lun, 18 sept 2023 a las 22:47, Relloso Barrio, Juan Bautista 
(mailto:jbauti...@neiker.eus>>) escribió:
Buenas noches.
Quisiera saber si alguien me puede decir como en estos comandos para un gráfico 
…


ggplot(data = AÑOS, aes(x = VARIEDAD, y = rAUDPCor, colour = ANO,
 group = ANO)) +
  stat_summary(fun = mean, geom = "point") +
  stat_summary(fun = mean, geom = "line&quo

[R-es] Hacer un Split plot

2023-10-10 Thread Relloso Barrio, Juan Bautista 
Buenas tardes a todos.
Quiero hacer un ANOVA para unos datos que tienen un diseño Split plot.
Y estoy utilizando dos editores diferentes, que, si todo fuera correcto y ya 
que toman los mismos datos, me debería dar el mismo resultado, … pero no es así.
Os quería pedir que me dijerais el que está mal y porqué está mal.
Los comandos que doy son estos:

model<-with(CEPAS, sp.plot(REP, CEPA, VARIEDAD, trAUDPC))
Y el otro es este
model2.aov<- aov(trAUDPC~CEPA*VARIEDAD+REP+Error(REP/CEPA))

 Un saludo.
Juan Bautista Relloso Barrio
Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
Departamento de Producción Vegetal
Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare Ekoizpen 
Departamentua
jbauti...@neiker.eus <mailto:jbauti...@neiker.eus> | M. 688 62 98 14
www.neiker.eus<http://www.neiker.eus/>
[cid:image001.png@01D9FB92.5EBA6090] <https://www.linkedin.com/company/neiker/> 
 [cid:image002.png@01D9FB92.5EBA6090] <https://twitter.com/neiker_BRTA> 
[cid:image003.png@01D9FB92.5EBA6090] <https://www.facebook.com/neikerBRTA>  
[cid:image004.png@01D9FB92.5EBA6090] <https://www.youtube.com/user/neikertec>
[cid:image005.png@01D9FB92.5EBA6090][ej_ekonomia_garapen_lateral]   

[https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg]

PRIBATUTASUN POLITIKA<https://neiker.eus/eu/pribatutasun-politika/> | POLÍTICA 
DE PRIVACIDAD<https://neiker.eus/es/politica-privacidad/> | LEGAL 
NOTICE<https://neiker.eus/en/privacy-policy/>



De: R-help-es  En nombre de Relloso Barrio, 
Juan Bautista
Enviado el: viernes, 22 de septiembre de 2023 16:18
Para: r-help-es@r-project.org
Asunto: [R-es] no encuentro el error

Buenas tardes.
Intento hacer la separación de medias “por tratamientos”
Pero me da un error que no consigo corregir. No sé que hago mal. Os paso los 
comandos y el error

# Separación de medias HSD por Tratamiento No funciona
by(, $TRAT, function(x) {
  anova_result <- aov(RTOSE ~ CORTE, data = x)
  HSD_result <- HSD.test(anova_result)
  Tratamiento <- unique(x$TRAT)
  return(list(Tratamiento = TRAT, HSD_result = HSD_result))
})
Y el error es este:
Error in pmatch(trt, names(A)) :
argument "trt" is missing, with no default

 Un saludo.
Juan Bautista Relloso Barrio
Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
Departamento de Producción Vegetal
Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare Ekoizpen 
Departamentua
jbauti...@neiker.eus <mailto:jbauti...@neiker.eus> | M. 688 62 98 14
www.neiker.eus<http://www.neiker.eus/>
[cid:image001.png@01D9FB92.5EBA6090] <https://www.linkedin.com/company/neiker/> 
 [cid:image002.png@01D9FB92.5EBA6090] <https://twitter.com/neiker_BRTA> 
[cid:image003.png@01D9FB92.5EBA6090] <https://www.facebook.com/neikerBRTA>  
[cid:image004.png@01D9FB92.5EBA6090] <https://www.youtube.com/user/neikertec>
[cid:image005.png@01D9FB92.5EBA6090][ej_ekonomia_garapen_lateral]   

[https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg]

PRIBATUTASUN POLITIKA<https://neiker.eus/eu/pribatutasun-politika/> | POLÍTICA 
DE PRIVACIDAD<https://neiker.eus/es/politica-privacidad/> | LEGAL 
NOTICE<https://neiker.eus/en/privacy-policy/>



De: Carlos Ortega mailto:c...@qualityexcellence.es>>
Enviado el: lunes, 18 de septiembre de 2023 23:04
Para: Relloso Barrio, Juan Bautista 
mailto:jbauti...@neiker.eus>>
CC: r-help-es@r-project.org<mailto:r-help-es@r-project.org>
Asunto: Re: [R-es] Boxplot ordenados...

Hola Juan,

Sí, te recomiendo que uses la librería "ggeasy" que simplifica mucho estas 
modificaciones, mejor que trabajar directamente con "ggplot".
Sería así:

#-
library(ggeasy)

ggplot(data = AÑOS, aes(x = VARIEDAD, y = rAUDPCor, colour = ANO,
 group = ANO)) +
  stat_summary(fun = mean, geom = "point") +
  stat_summary(fun = mean, geom = "line") +
  labs(y  =  'mean rAUDPCor') +
  labs(x  =  'Variety') +
  theme_bw() +
easy_rotate_x_labels( angle = 90)

#


Gracias,
Carlos Ortega
www.qualityexcellence.es<http://www.qualityexcellence.es>

El lun, 18 sept 2023 a las 22:47, Relloso Barrio, Juan Bautista 
(mailto:jbauti...@neiker.eus>>) escribió:
Buenas noches.
Quisiera saber si alguien me puede decir como en estos comandos para un gráfico 
…


ggplot(data = AÑOS, aes(x = VARIEDAD, y = rAUDPCor, colour = ANO,
 group = ANO)) +
  stat_summary(fun = mean, geom = "point") +
  stat_summary(fun = mean, geom = "line") +
  labs(y  =  'mean rAUDPCor') +
  labs(x  =  'Variety') +
  theme_bw()

Qué debo de añadir para que la orientación de las los nombres de las variedades 
del eje

[R-es] no encuentro el error

2023-09-22 Thread Relloso Barrio, Juan Bautista 
Buenas tardes.
Intento hacer la separación de medias “por tratamientos”
Pero me da un error que no consigo corregir. No sé que hago mal. Os paso los 
comandos y el error

# Separación de medias HSD por Tratamiento No funciona
by(, $TRAT, function(x) {
  anova_result <- aov(RTOSE ~ CORTE, data = x)
  HSD_result <- HSD.test(anova_result)
  Tratamiento <- unique(x$TRAT)
  return(list(Tratamiento = TRAT, HSD_result = HSD_result))
})
Y el error es este:
Error in pmatch(trt, names(A)) :
argument "trt" is missing, with no default

 Un saludo.
Juan Bautista Relloso Barrio
Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
Departamento de Producción Vegetal
Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare Ekoizpen 
Departamentua
jbauti...@neiker.eus <mailto:jbauti...@neiker.eus> | M. 688 62 98 14
www.neiker.eus<http://www.neiker.eus/>
[cid:image001.png@01D9ED70.54A24120] <https://www.linkedin.com/company/neiker/> 
 [cid:image002.png@01D9ED70.54A24120] <https://twitter.com/neiker_BRTA> 
[cid:image003.png@01D9ED70.54A24120] <https://www.facebook.com/neikerBRTA>  
[cid:image004.png@01D9ED70.54A24120] <https://www.youtube.com/user/neikertec>
[cid:image005.png@01D9ED70.54A24120][ej_ekonomia_garapen_lateral]   

[https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg]

PRIBATUTASUN POLITIKA<https://neiker.eus/eu/pribatutasun-politika/> | POLÍTICA 
DE PRIVACIDAD<https://neiker.eus/es/politica-privacidad/> | LEGAL 
NOTICE<https://neiker.eus/en/privacy-policy/>



De: Carlos Ortega 
Enviado el: lunes, 18 de septiembre de 2023 23:04
Para: Relloso Barrio, Juan Bautista 
CC: r-help-es@r-project.org
Asunto: Re: [R-es] Boxplot ordenados...

Hola Juan,

Sí, te recomiendo que uses la librería "ggeasy" que simplifica mucho estas 
modificaciones, mejor que trabajar directamente con "ggplot".
Sería así:

#-
library(ggeasy)

ggplot(data = AÑOS, aes(x = VARIEDAD, y = rAUDPCor, colour = ANO,
 group = ANO)) +
  stat_summary(fun = mean, geom = "point") +
  stat_summary(fun = mean, geom = "line") +
  labs(y  =  'mean rAUDPCor') +
  labs(x  =  'Variety') +
  theme_bw() +
easy_rotate_x_labels( angle = 90)

#


Gracias,
Carlos Ortega
www.qualityexcellence.es<http://www.qualityexcellence.es>

El lun, 18 sept 2023 a las 22:47, Relloso Barrio, Juan Bautista 
(mailto:jbauti...@neiker.eus>>) escribió:
Buenas noches.
Quisiera saber si alguien me puede decir como en estos comandos para un gráfico 
…


ggplot(data = AÑOS, aes(x = VARIEDAD, y = rAUDPCor, colour = ANO,
 group = ANO)) +
  stat_summary(fun = mean, geom = "point") +
  stat_summary(fun = mean, geom = "line") +
  labs(y  =  'mean rAUDPCor') +
  labs(x  =  'Variety') +
  theme_bw()

Qué debo de añadir para que la orientación de las los nombres de las variedades 
del eje “X” me aparezcan en vertical en vez de en horizontal.
Muchas gracias.
Un saludo.
Juan Bautista Relloso Barrio
Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
Departamento de Producción Vegetal
Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare Ekoizpen 
Departamentua
jbauti...@neiker.eus <mailto:jbauti...@neiker.eus> | M. 688 62 98 14
www.neiker.eus<http://www.neiker.eus/>
[cid:image001.png@01D9EA82.0D7BB740] <https://www.linkedin.com/company/neiker/> 
 [cid:image002.png@01D9EA82.0D7BB740] <https://twitter.com/neiker_BRTA> 
[cid:image003.png@01D9EA82.0D7BB740] <https://www.facebook.com/neikerBRTA>  
[cid:image004.png@01D9EA82.0D7BB740] <https://www.youtube.com/user/neikertec>
[cid:image005.png@01D9EA82.0D7BB740][ej_ekonomia_garapen_lateral]   

[https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg]

PRIBATUTASUN POLITIKA<https://neiker.eus/eu/pribatutasun-politika/> | POLÍTICA 
DE PRIVACIDAD<https://neiker.eus/es/politica-privacidad/> | LEGAL 
NOTICE<https://neiker.eus/en/privacy-policy/>

___
R-help-es mailing list
R-help-es@r-project.org<mailto:R-help-es@r-project.org>
https://stat.ethz.ch/mailman/listinfo/r-help-es


--
Saludos,
Carlos Ortega
www.qualityexcellence.es<http://www.qualityexcellence.es>
___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] Boxplot ordenados...

2023-09-18 Thread Relloso Barrio, Juan Bautista 
Mucíisimas gracias Carlos.
Funciona perfectamente.

Un saludo.
Juan Bautista Relloso Barrio
Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
Departamento de Producción Vegetal
Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare Ekoizpen 
Departamentua
jbauti...@neiker.eus <mailto:jbauti...@neiker.eus> | M. 688 62 98 14
www.neiker.eus<http://www.neiker.eus/>
[cid:image001.png@01D9EA85.C63F08B0] <https://www.linkedin.com/company/neiker/> 
 [cid:image002.png@01D9EA85.C63F08B0] <https://twitter.com/neiker_BRTA> 
[cid:image003.png@01D9EA85.C63F08B0] <https://www.facebook.com/neikerBRTA>  
[cid:image004.png@01D9EA85.C63F08B0] <https://www.youtube.com/user/neikertec>
[cid:image005.png@01D9EA85.C63F08B0][ej_ekonomia_garapen_lateral]   

[https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg]

PRIBATUTASUN POLITIKA<https://neiker.eus/eu/pribatutasun-politika/> | POLÍTICA 
DE PRIVACIDAD<https://neiker.eus/es/politica-privacidad/> | LEGAL 
NOTICE<https://neiker.eus/en/privacy-policy/>

De: Carlos Ortega 
Enviado el: lunes, 18 de septiembre de 2023 23:04
Para: Relloso Barrio, Juan Bautista 
CC: r-help-es@r-project.org
Asunto: Re: [R-es] Boxplot ordenados...

Hola Juan,

Sí, te recomiendo que uses la librería "ggeasy" que simplifica mucho estas 
modificaciones, mejor que trabajar directamente con "ggplot".
Sería así:

#-
library(ggeasy)

ggplot(data = AÑOS, aes(x = VARIEDAD, y = rAUDPCor, colour = ANO,
 group = ANO)) +
  stat_summary(fun = mean, geom = "point") +
  stat_summary(fun = mean, geom = "line") +
  labs(y  =  'mean rAUDPCor') +
  labs(x  =  'Variety') +
  theme_bw() +
easy_rotate_x_labels( angle = 90)

#


Gracias,
Carlos Ortega
www.qualityexcellence.es<http://www.qualityexcellence.es>

El lun, 18 sept 2023 a las 22:47, Relloso Barrio, Juan Bautista 
(mailto:jbauti...@neiker.eus>>) escribió:
Buenas noches.
Quisiera saber si alguien me puede decir como en estos comandos para un gráfico 
…


ggplot(data = AÑOS, aes(x = VARIEDAD, y = rAUDPCor, colour = ANO,
 group = ANO)) +
  stat_summary(fun = mean, geom = "point") +
  stat_summary(fun = mean, geom = "line") +
  labs(y  =  'mean rAUDPCor') +
  labs(x  =  'Variety') +
  theme_bw()

Qué debo de añadir para que la orientación de las los nombres de las variedades 
del eje “X” me aparezcan en vertical en vez de en horizontal.
Muchas gracias.
Un saludo.
Juan Bautista Relloso Barrio
Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
Departamento de Producción Vegetal
Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare Ekoizpen 
Departamentua
jbauti...@neiker.eus <mailto:jbauti...@neiker.eus> | M. 688 62 98 14
www.neiker.eus<http://www.neiker.eus/>
[cid:image001.png@01D9EA82.0D7BB740] <https://www.linkedin.com/company/neiker/> 
 [cid:image002.png@01D9EA82.0D7BB740] <https://twitter.com/neiker_BRTA> 
[cid:image003.png@01D9EA82.0D7BB740] <https://www.facebook.com/neikerBRTA>  
[cid:image004.png@01D9EA82.0D7BB740] <https://www.youtube.com/user/neikertec>
[cid:image005.png@01D9EA82.0D7BB740][ej_ekonomia_garapen_lateral]   

[https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg]

PRIBATUTASUN POLITIKA<https://neiker.eus/eu/pribatutasun-politika/> | POLÍTICA 
DE PRIVACIDAD<https://neiker.eus/es/politica-privacidad/> | LEGAL 
NOTICE<https://neiker.eus/en/privacy-policy/>

___
R-help-es mailing list
R-help-es@r-project.org<mailto:R-help-es@r-project.org>
https://stat.ethz.ch/mailman/listinfo/r-help-es


--
Saludos,
Carlos Ortega
www.qualityexcellence.es<http://www.qualityexcellence.es>
___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] Boxplot ordenados...

2023-09-18 Thread Relloso Barrio, Juan Bautista 
Buenas noches.
Quisiera saber si alguien me puede decir como en estos comandos para un gráfico 
…


ggplot(data = AÑOS, aes(x = VARIEDAD, y = rAUDPCor, colour = ANO,
 group = ANO)) +
  stat_summary(fun = mean, geom = "point") +
  stat_summary(fun = mean, geom = "line") +
  labs(y  =  'mean rAUDPCor') +
  labs(x  =  'Variety') +
  theme_bw()

Qué debo de añadir para que la orientación de las los nombres de las variedades 
del eje “X” me aparezcan en vertical en vez de en horizontal.
Muchas gracias.
Un saludo.
Juan Bautista Relloso Barrio
Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
Departamento de Producción Vegetal
Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare Ekoizpen 
Departamentua
jbauti...@neiker.eus  | M. 688 62 98 14
www.neiker.eus
[cid:image001.png@01D9EA82.0D7BB740]  
 [cid:image002.png@01D9EA82.0D7BB740]  
[cid:image003.png@01D9EA82.0D7BB740]   
[cid:image004.png@01D9EA82.0D7BB740] 
[cid:image005.png@01D9EA82.0D7BB740][ej_ekonomia_garapen_lateral]   

[https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg]

PRIBATUTASUN POLITIKA | POLÍTICA 
DE PRIVACIDAD | LEGAL 
NOTICE

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] Realizar anovas, por cada uno de los niveles de uno de los factores del ensayo

2023-08-30 Thread Relloso Barrio, Juan Bautista 
Buenos días.
Una consulta. Alguiensabe como puedo conseguir que los gráficos Box plot salgan 
ordenador por los valores dela variable de mayo a menor o de menor a mayor?
Muchas gracias.
Un saludo.
Juan Bautista Relloso Barrio
Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
Departamento de Producción Vegetal
Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare Ekoizpen 
Departamentua
jbauti...@neiker.eus  | M. 688 62 98 14
www.neiker.eus
[cid:image001.png@01D9DB38.08EC5DA0]  
 [cid:image002.png@01D9DB38.08EC5DA0]  
[cid:image003.png@01D9DB38.08EC5DA0]   
[cid:image004.png@01D9DB38.08EC5DA0] 
[cid:image005.png@01D9DB38.08EC5DA0][ej_ekonomia_garapen_lateral]   

[https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg]

PRIBATUTASUN POLITIKA | POLÍTICA 
DE PRIVACIDAD | LEGAL 
NOTICE

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

[R-es] Realizar anovas, por cada uno de los niveles de uno de los factores del ensayo

2023-03-02 Thread Relloso Barrio, Juan Bautista 
Buenas tardes.
Tengo un ensayo de dos factores (Variedad y dosis)
Quisiera hacer anovas para cada una de las dos variedades que estoy evaluando.
Lo puedo hacer cogiendo los datos primero de una variedad y luego de la otra.
Pero creo que hay un comando "by variedad" que lo hace si necesidad de andar 
modificando el archivo de datos. Pero no sé dónde hay que colocarlo.
Si alguno me puede ayudar. Gracias.
Un saludo.
Juan Bautista Relloso Barrio
Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
Departamento de Producción Vegetal
Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare Ekoizpen 
Departamentua
jbauti...@neiker.eus  | M. 688 62 98 14
www.neiker.eus
[cid:image001.png@01D94D44.89C256F0]  
 [cid:image002.png@01D94D44.89C256F0]  
[cid:image003.png@01D94D44.89C256F0]   
[cid:image004.png@01D94D44.89C256F0] 
[cid:image005.png@01D94D44.89C256F0][ej_ekonomia_garapen_lateral]   

[https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg]

PRIBATUTASUN POLITIKA | POLÍTICA 
DE PRIVACIDAD | LEGAL 
NOTICE

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es