使用R中的ggplot在条形图中绘制多个数据

Question

我有一个数据框，我想在其中计算具有给定热量损失的坦克数量。另外，我需要区分具有加热线圈的那些没有的加热线圈以及加热线圈是全年活动还是仅在夏季活动。

我的数据框示例如下：

sample.df <- data.frame(
  NumberOfTanks = c(1,1,2,1,2,1,1,1,2,1,2,1),
  ElectricalSupport = c("None", "Summer","Summer","Always","None","Always","Summer","Always","None","Always","None", "Summer"),
  HeatLoss = c(0.50,1.20,2.0,0.50,1.20,2.0,0.50,1.20,2.0,0.50,1.20,2.0),
  BFactor = c(0,0.5,0.7,1,1,0.7,0,0.5,0.7,1,1,0.7)
  )
sample.df <- sample.df[order(sample.df$BFactor),]

我尝试了下面的代码，它给出了所有坦克具有给定热量损失的坦克数量

ggplot(sample.df, aes(x=HeatLoss, y=NumberOfTanks, fill=factor(BFactor)))+
  geom_bar(stat = "identity")+
  scale_x_continuous(breaks = seq(0,3,0.2))

现在我想进一步区分，以便每个“HeatLoss”对应一个“HeatLoss”有三个条形图（即“无”，“夏天”或“总是”）。

我发现许多人建议将数据帧重塑为“长”格式，与我的问题相似;但是，由于我需要计算坦克的数量（在另一栏中给出），我不知道这是否可行。

非常感谢，

/的Morten