Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/67.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 有没有办法在multcomp包中反转cld的字母?_R - Fatal编程技术网

R 有没有办法在multcomp包中反转cld的字母?

R 有没有办法在multcomp包中反转cld的字母?,r,R,cld以紧凑的字母显示差异。最大的不同平均值得到一个“a”,第二个是“b”,依此类推。然而,我希望最小的平均值是“a”(字母按升序而不是降序排列) 以下是帮助中的一个可复制示例: data(warpbreaks) amod <- aov(breaks ~ tension, data = warpbreaks) tuk <- glht(amod, linfct = mcp(tension = "Tukey")) tuk.cld <- cld(tuk) tuk.cld 数据(扭曲

cld
以紧凑的字母显示差异。最大的不同平均值得到一个“a”,第二个是“b”,依此类推。然而,我希望最小的平均值是“a”(字母按升序而不是降序排列)

以下是帮助中的一个可复制示例:

data(warpbreaks)
amod <- aov(breaks ~ tension, data = warpbreaks)
tuk <- glht(amod, linfct = mcp(tension = "Tukey"))
tuk.cld <- cld(tuk)
tuk.cld
数据(扭曲断裂)

amod我不熟悉multcomp包,但我注意到

tuk.cld$mcletters$aLetters 
 [1] "a" "b" "c" "d" "e" "f" "g" "h" "i" "j" "k" "l" "m" "n" "o" "p" "q" "r" "s" 
[20] "t" "u" "v" "w" "x" "y" "z" "A" "B" "C" "D" "E" "F" "G" "H" "I" "J" "K" "L" 
[ 39] "M" "N" "O" "P" "Q" "R" "S" "T" "U" "V" "W" "X" "Y" "Z"
这向我建议,在
cld()
中有一个命令开关,允许您选择所需的任何标识符集。例如

rev.lets<-rev(c(letters,LETTERS))

rev.lets我已向
multcomp
软件包提交了一份稿件。现在,
递减
标志控制字母的顺序。将其设置为
TRUE
将颠倒顺序

data(warpbreaks)
amod <- aov(breaks ~ tension, data = warpbreaks)
tuk <- glht(amod, linfct = mcp(tension = "Tukey"))
tuk.cld <- cld(tuk)
tuk.cld
tuk.cld_dec <- cld(tuk, decreasing = TRUE)
tuk.cld_dec
数据(扭曲断裂)

amod不幸的是,
cld
函数在编写时没有使用
..
参数,而
insert\u absolpt
正是该函数用于刻字。@DWin,是的,您是对的。甚至它也有
,这会起作用,因为它就是Z,Y,X。。。A.我希望这些信件的排列方式越来越多。我不知道这在我的问题中是否清楚。效果很好。谢谢