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.我希望这些信件的排列方式越来越多。我不知道这在我的问题中是否清楚。效果很好。谢谢