R点阵条形图: choose order of bars?

Question

我的数据如下所示:

service,rating_1,rating_2,rating_3,rating_4,rating_5
renew_patent,0,0,1,2,11
apply_benefit,21,20,121,828,1744
apply_employment_tribunal,0,0,0,0,0

我希望 R 为每一行打印一个直方图，列作为直方图的条形。

到目前为止我有这个:

require(lattice)
data <- read.csv("test.csv", header = TRUE)
colors = c('red', 'orange', 'yellow', 'blue', 'green')
barchart(rating_1+rating_2+rating_3+rating_4+rating_5 ~ service, data=data, 
  auto.key=list(space='right'), scales=list(x=list(rot=45)), 
  ylab="Percentage of total", col=colors)

它正在工作，但它按字母顺序打印柱状图，而不是它们在 CSV 文件中指定的顺序。

如何更改此设置，以便条形按 CSV 文件中的顺序排列， renew_patent第一的？

Answer 1

您需要在数据本身中指定级别的顺序，然后barchart会做你想做的。

一种选择是运行如下代码:

data$service <- factor(data$service, levels=unique( as.character(data$service) ) )

调用前 barchart .