R 中的 geom_histogram() 到 hist()

Question

我有以下代码：

mapping <- aes(
  x = values
  , color = factor(par_a)
)

plot <- (ggplot(data=data, mapping=mapping)
         + geom_histogram(binwidth = 5, na.rm = TRUE)
         + facet_grid(par_b ~ par_c ~ par_d, scales = "free")
)

由于我被要求使用hist()因为可能使用plot=FALSE ，现在我想调整代码。

mapping <- aes(
      x = values
      , color = factor(par_a)
    )

plot2 <- hist(values, breaks = seq(min(values), max(values)+5, by = 5))
         + facet_grid(par_b ~ par_c ~ par_d, scales = "free")

但是，我不知道如何实现 'color = factor(par_a)' 或整行 'facet_grid(par_b ~ par_c ~ par_d, scales = "free")'。 我想这些函数没有明确支持“hist()”，但如果有人能告诉我它们的替代方案是什么，我真的很感激？

Answer 1

基础绘图可以使用函数par(mfrow=c(num_rows,num_cols))来构建子图。 您进行的下一个图、历史等调用将填充所需的子图。 并为图中的条着色，您可以按照此处所述创建一个变量以传递给hist的颜色参数。