图 13.7(c) 显示了两个叠加在一起的直方图。可以相当清楚地看出两者存在差异，且发动机 B 的运行时间往往比发动机 A 的更长。然而，仅凭直方图，很难精确说明差异的大小，也难以评估可以断言存在差异的置信程度。

图 13.8 给出了温度对应的直方图。这次结果要相似得多。不难想象，如果样本中一个相对较小的子集给出了与实际所得不同的结果，那么两个直方图之间可能就完全没有差异了。因此，这一差异可能只是偶然因素造成的。

图 13.8 环境温度直方图：(a) 发动机 A；(b) 发动机 B；(c) 叠加图。

环境温度直方图的 R 代码

发动机 A 环境温度直方图 h<-hist(temp_A, breaks=seq(4.99, 30.99, 2.5), border="black", col="deepskyblue", axes=F, main="", ylab="Number", xlab = expression(paste('Ambient temperature in ',~degree,'C',sep=''))) axis(side=1, at=seq(5,32.5,2.5))