R 删除ggplot2/晶格条形图中的空组空间

这是我关于在晶格中使用条形图绘制定义的组的问答的后续内容。因此，根据这个小练习的解决方案，我意识到，当下一行数据分配给条形图上的另一个空间时，R会按数据框中的显示绘制数据，并在每个条形图之间留出空间。如果你看看情节，你就会明白我的意思：

> data.frame(SOExample2)
   Study.ID Diagnosis   Level
1         1    Cancer 1040.58
2         2    Cancer  810.92
3         3    Cancer 2087.80
4         4    Cancer 3959.02
5         5    Cancer 3648.48
6         6    Cancer 1191.74
7         7    Cancer 1156.90
8         8    Cancer 2705.56
9         9    Cancer  827.26
10       10    Cancer  867.16
11       11    Cancer  575.10
12       12    Cancer  699.85
13       13    Cancer 1121.86
14       14    Cancer 1830.62
15       15    Cancer 4203.01
16       16    Cancer  874.59
17       17    Cancer 1037.20
18       18    Cancer 1398.56
19       19    Cancer  910.49
20       20    Cancer  725.60
21       21    Cancer  894.05
22       22    Cancer 1489.25
23       23    Cancer 1518.76
24       24    Cancer  821.60
25       25    Cancer  530.35
26       26    Cancer 1191.80
27       27    Cancer 1920.12
28       28    Cancer 1330.60
29       29    Cancer  835.95
30       30    Cancer  525.22

require(lattice)
SOExample2$group<-ifelse(Level>median(Level),1,0)
barchart(Level~factor(group), data=SOExample2, groups=Study.ID)

那么，关于如何移除这些空白的想法呢

干杯

---

Oliver

您可以在x值时使用

Study.ID

，并将其转换为因子，以确保值不会被解释为数字。然后，对于facet_grid（）内的

ggplot2

解决方案，添加参数

scale=“free”

以删除空标高

ggplot(SOExample2,aes(factor(Study.ID),y=Level))+
             geom_bar(stat="identity")+
             facet_grid(.~group,scales="free")

---

您可以使用

Study.ID

作为x值并将其转换为因子，以确保值不会被解释为数字。然后，对于facet_grid（）内的

ggplot2

解决方案，添加参数

scale=“free”

以删除空标高

ggplot(SOExample2,aes(factor(Study.ID),y=Level))+
             geom_bar(stat="identity")+
             facet_grid(.~group,scales="free")

---

您可以使用

Study.ID

作为x值并将其转换为因子，以确保值不会被解释为数字。然后，对于facet_grid（）内的

ggplot2

解决方案，添加参数

scale=“free”

以删除空标高

ggplot(SOExample2,aes(factor(Study.ID),y=Level))+
             geom_bar(stat="identity")+
             facet_grid(.~group,scales="free")

---

您可以使用

Study.ID

作为x值并将其转换为因子，以确保值不会被解释为数字。然后，对于facet_grid（）内的

ggplot2

解决方案，添加参数

scale=“free”

以删除空标高

ggplot(SOExample2,aes(factor(Study.ID),y=Level))+
             geom_bar(stat="identity")+
             facet_grid(.~group,scales="free")

---

亲爱的先生，你是个天才！！！非常非常好的工作。工作完美！！！！！谢谢你的帮助！哦，顺便问一下，有没有办法在整个地块的中间（水平）添加一条水平线，比如说红色？谢谢你所做的一切。只需在我的答案中的代码中添加一行

+geom_hline（aes（yintercept=median（Level）），color=“red”）

。你我亲爱的先生是个天才！！！非常非常好的工作。工作完美！！！！！谢谢你的帮助！哦，顺便问一下，有没有办法在整个地块的中间（水平）添加一条水平线，比如说红色？谢谢你所做的一切。只需在我的答案中的代码中添加一行

+geom_hline（aes（yintercept=median（Level）），color=“red”）

。你我亲爱的先生是个天才！！！非常非常好的工作。工作完美！！！！！谢谢你的帮助！哦，顺便问一下，有没有办法在整个地块的中间（水平）添加一条水平线，比如说红色？谢谢你所做的一切。只需在我的答案中的代码中添加一行

+geom_hline（aes（yintercept=median（Level）），color=“red”）

。你我亲爱的先生是个天才！！！非常非常好的工作。工作完美！！！！！谢谢你的帮助！哦，顺便问一下，有没有办法在整个地块的中间（水平）添加一条水平线，比如说红色？感谢你所做的一切。只需在我的答案中的代码中添加行

+geom_hline（aes（yintercept=median（Level）），color=“red”）

。在Lattice中：使用latticeExtra包的函数resizePanels（）。示例如下：在Lattice中：使用latticeExtra包的函数resizePanels（）。示例如下：在Lattice中：使用latticeExtra包的函数resizePanels（）。示例如下：在Lattice中：使用latticeExtra包的函数resizePanels（）。示例如下所示：