Hola,

El mensaje parece claro. La función HSD.test espera un argumento trt que no le 
estás pasando. Tu ejemplo no es reproducible, pero intuyo que tendrás que poner 
en la tercera línea que mandas algo así:

> HSD_result <- HSD.test(anova_result, “CORTE")



Un saludo,

Emilio L. Cano
http://emilio.lcano.com 




> El 22 sept 2023, a las 16:17, Relloso Barrio, Juan Bautista 
> <jbauti...@neiker.eus> escribió:
> 
> 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(pppp, pppp$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/>                <image001.png> 
> <https://www.linkedin.com/company/neiker/> <image002.png> 
> <https://twitter.com/neiker_BRTA><image003.png> 
> <https://www.facebook.com/neikerBRTA> <image004.png> 
> <https://www.youtube.com/user/neikertec>
> <image005.png>        <image006.jpg>          <image007.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 <c...@qualityexcellence.es 
> <mailto:c...@qualityexcellence.es>> 
> Enviado el: lunes, 18 de septiembre de 2023 23:04
> Para: Relloso Barrio, Juan Bautista <jbauti...@neiker.eus 
> <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 
> (<jbauti...@neiker.eus <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/>                 
> <https://www.linkedin.com/company/neiker/>  <https://twitter.com/neiker_BRTA> 
> <https://www.facebook.com/neikerBRTA>  
> <https://www.youtube.com/user/neikertec>
>                   
>  
> 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 <mailto:R-help-es@r-project.org>
> https://stat.ethz.ch/mailman/listinfo/r-help-es


        [[alternative HTML version deleted]]

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

Reply via email to