小编zai*_*itz的帖子

我是新手R用户,我正在尝试使用HH包中的likert函数创建一个绘图.我的问题似乎来自重复类别标签.更容易显示问题:

    library(HH)

    responses <- data.frame( Subtable= c(rep('Var1',5),rep('Var2',4),rep('Var3',3)),
    Question=c('very low','low','average','high','very high', '<12', '12-14', '15+',
    'missing', '<25','25+','missing'), Res1=as.numeric(c(0.05, 0.19, 0.38, 0.24, .07,
    0.09, 0.73, 0.17, 0.02, 0.78, 0.20,  0.02)), Res2=as.numeric(c(0.19, 0.04, 0.39,
    0.22, 0.06, 0.09, 0.50, 0.16, 0.02, 0.75, 0.46, 0.20)))

    likert(Question ~ . | Subtable, responses,
    scales=list(y=list(relation="free")), layout=c(1,3),
    positive.order=TRUE, 
    between=list(y=0),
    strip=FALSE, strip.left=strip.custom(bg="gray97"),
    par.strip.text=list(cex=.6, lines=3),
    main="Description of Sample",rightAxis=FALSE,
    ylab=NULL,  xlab='Percent')

不幸的是,它会创建一些并不存在的奇怪空间,如下图所示:

这似乎来自重复的"缺失"类别.我的实际数据有几个重复(例如,'不','其他'),每当它们被包括在内时我得到这些额外的空格.如果我运行相同的代码但删除重复的类别,那么它运行正常.在这种情况下,这意味着将上面代码中的"响应"更改为responses[! responses$Question %in% 'missing',].

有人可以告诉我如何使用所有类别创建图表,而无需获得"额外"空格？感谢您的帮助和耐心.

-Z

R 3.0.2
HH 3.0-3
lattice 0.20-24
latticeExtra 0.6-26