1

我正在使用histogramlattice包来绘制两个直方图，以具有两个选项的变量为条件：男性或女性。

histogram(~ raw$Housework_Tot_Min [(raw$Housework_Tot_Min != 0) & 
(raw$Housework_Tot_Min < 1000)] | raw$Gender)

代码输出：两个直方图，按性别分做家务的分钟数

但是，当我实际查看数据时，这些直方图是不正确的。通过绘图：

histogram(~ raw$Housework_Tot_Min [(raw$Housework_Tot_Min != 0) & 
(raw$Housework_Tot_Min < 1000) & (raw$Gender == "Female")]

和：

histogram(~ raw$Housework_Tot_Min [(raw$Housework_Tot_Min != 0) & 
(raw$Housework_Tot_Min < 1000) & (raw$Gender == "Male")]

我再次得到两个直方图，但它们看起来非常不同

有谁知道为什么这些输出不匹配？我有更多二进制类型的面板要绘制，并且必须单独执行它们确实违背了使用lattice包的目的！

如果这掩盖了对简单概念的基本误解，我深表歉意，我仍然是 R 的初学者！非常感谢您的帮助。

4

2 回答 2

2

该问题与 in 中的不同值有关panel.args.common（即，所有面板函数共有的参数，请参阅?trellis.object）。这是一些示例代码来阐明我的观点。

library(lattice)

## paneled plot
hist1 <- histogram( ~ Sepal.Width | Species, data = iris)
hist1$panel.args.common

# $breaks
# [1] 1.904 2.228 2.552 2.876 3.200 3.524 3.848 4.172 4.496
# 
# $type
# [1] "percent"
#
# $equal.widths
# [1] TRUE
# 
# $nint
# [1] 8

## single plot    
hist2 <- histogram( ~ Sepal.Width, data = iris[iris$Species == "setosa", ])
hist2$panel.args.common

# $breaks
# [1] 2.216 2.540 2.864 3.188 3.512 3.836 4.160 4.484
# 
# $type
# [1] "percent"
# 
# $equal.widths
# [1] TRUE
# 
# $nint
# [1] 7

nint（直方图箱的数量，请参阅?histogram）和breaks（箱的断点）在所有目标面板中计算，因此在hist1和之间变化hist2。如果您希望这些参数相同以使两个图看起来相似，则只需在创建两个图后运行以下代码行。

hist2$panel.args.common <- hist1$panel.args.common
## or vice versa, depending on the number of bins and breakpoints to use

library(gridExtra)
grid.arrange(hist1, hist2, ncol = 2)

直方图

于 2016-04-14T10:18:17.107 回答
0

事实证明，问题在于基于使用括号应用的排除项的数据不匹配。代替：

histogram(~ raw$Housework_Tot_Min [(raw$Housework_Tot_Min != 0) & 
(raw$Housework_Tot_Min < 1000)] | raw$Gender)

它应该是：

histogram(~ Housework_Tot_Min [(Housework_Tot_Min != 0) & (Housework_Tot_Min < 1000)] | 
        Gender [(Housework_Tot_Min != 0) & (Housework_Tot_Min < 1000)], data = raw,
      main = "Time Observed Housework by Gender",
      xlab = "Minutes spent",
      breaks = seq(from = 0, to = 400, by = 20))

请注意，排除现在适用于家务时间和性别变量，消除了数据中的不匹配。

正确的情节已粘贴在下面。再次感谢大家的指导。

更新直方图

于 2016-04-23T23:52:14.153 回答