2011-10-17 26 views
2

cld使紧凑的字母显示的差异。最大的不同意思是“a”,第二个“b”等等。不过,我希望最不重要的是得到一个“a”,即得到的字母升序降序排列。有没有办法在multcomp包中反转cld的字母?

下面是从帮助一个重复的例子:

data(warpbreaks) 
amod <- aov(breaks ~ tension, data = warpbreaks) 
tuk <- glht(amod, linfct = mcp(tension = "Tukey")) 
tuk.cld <- cld(tuk) 
tuk.cld 

回答

0

我已经提交了对multcomp包的贡献。现在decreasing标志控制字母的顺序。将其设置为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 
0

我不熟悉瓦特/ 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)) 
+0

不幸的是,'cld'函数没有'...'参数写入'insert_absorb',这是执行刻字的函数。 –

+0

@DWin,是的,你说得对。即使它有'...'这会做的伎俩,因为它只是Z,Y,X,... a。我希望通过增加手段来订购这些信件。我不知道我的问题是否清楚。 –

相关问题