在 R 中重新排序箱线图和须线图

Question

我在 R 中有以下最小示例代码：

data.time = c(1, 4, 8, 9, 2, 4, 1)  
data.difficulty = c("hard", "simple", "simple", "hard", "simple", "simple", "hard")  
library(lattice)  
bwplot(data.time ~ data.difficulty, xlab="Difficulty", ylab="Time")  

如果将其绘制成图表，您可以看到“困难”位于左侧，“简单”位于右侧。我希望情况相反。有没有办法在不转换或修改我的原始数据的情况下做到这一点？我不想更改它，因为数据稍后将用于其他图表和分析。

谢谢

Answer 1

您可以使用 relevel 函数将引用排序为“简单”。我必须首先将 data.difficulty 转换为因子，因为它是字符。

data.difficulty<-relevel(as.factor(data.difficulty), ref="simple")
bwplot(data.time ~ data.difficulty, xlab="Difficulty", ylab="Time") 

Answer 2

我不知道将难度向量转换为因子是否违反了不更改数据的约束。其他函数很可能将其视为与原始字符向量相同的基础。

dfrm <- data.frame(time=data.time, difficulty=data.difficulty) 
 dfrm$difficulty <- factor(dfrm$difficulty, levels=c("simple", "hard") )
 bwplot(time ~ difficulty, data=dfrm, xlab="Difficulty", ylab="Time")

Answer 3

遵循其他答案：这通过将数据组织为数据框来稍微打破您的规则（以便我们可以为 bwplot 动态转换它），但是如果你可以忍受，这可能是一种更好的组织分析的方法……当来自同一组的变量被打包到数据帧中而不是作为单独的对象放置在 R 中时，R 中的很多事情（例如模型预测）会变得更容易。工作区。只要正确使用 data= 参数，其余命令也会变得更易于阅读。

data.time = c(1, 4, 8, 9, 2, 4, 1)  
data.difficulty = c("hard", "simple", "simple", "hard", 
                  "simple", "simple", "hard")  
mydata <- data.frame(time=data.time,difficulty=data.difficulty)
library(lattice)  
bwplot(time ~ difficulty, xlab="Difficulty", ylab="Time",
   data = transform(mydata,
       difficulty=relevel(difficulty,"simple")))