使用R Base Graphics的堆积直方图

Question

使用ggplot2可以很容易地创建堆叠直方图：

library(ggplot2)

ggplot(data = iris, aes(x = Sepal.Length, fill = Species)) + 
  geom_histogram(colour = 'white') 

ggplot(data = iris, aes(x = Sepal.Length, fill = Species)) + 
  geom_histogram(colour = 'white', position = 'fill')

我想知道如何仅使用 R基础图形创建两个直方图。

Answer 1

您可以根据barplot()和Species的频率表生成Sepal.Length的两个图。

# Create frequency table
tab <- table(iris$Species, iris$Sepal.Length)

# Stacked barplot
barplot(tab)

# Stacked percent barplot
barplot(prop.table(tab, 2)) # Need to convert to marginal table first