（2）使用图形布局在一张图中绘制3个图形（社区分布条形图、性别分布条形图、态度分布条形图）（3）绘制饼图和扇形图观察被调查者所在的社区的分布状况。 （4）生成80个住户性别和态度的马赛克图

在R语言中，为了满足上述需求，我们可以使用一些图形库，比如`ggplot2`。以下是逐步操作的示例：

**（2）在一个图中绘制三个图形**

library(ggplot2)
# 创建数据框，如果已有数据则直接使用
data <- data.frame(Community = c(...), Gender = c(...), Attitude = c(...)) 

# 绘制条形图
p1 <- ggbarplot(data, x = "社区", y = "Gender", fill = "Gender")
p2 <- ggbarplot(data, x = "社区", y = "Attitude", fill = "Attitude")
p3 <- ggbarplot(data, x = "社区", y = "所有其他列", fill = "all other columns")  # 如果你想合并其他两个值

# 将它们放在同一个画布上
grid.arrange(p1, p2, p3, ncol = 1)  # 或者调整 ncol 参数改变排列方式

**（3）绘制饼图和扇形图**

# 饼图
p4 <- ggplot(data, aes(x = "", y = ..count.., fill = Community)) +
  geom_bar(stat = "identity", width = 1) +
  coord_polar(theta = "y") +
  labs(fill = "社区")

# 扇形图
p5 <- ggplot(data, aes(x = "", y = ..count../sum(..count..), fill = Community)) +
  geom_bar(stat = "identity", width = 1) +
  coord_polar(theta = "y", start = 0) +
  theme_void()

# 显示图表
grid.arrange(p4, p5, ncol = 1)

**（4）生成马赛克图**

p6 <- ggmosaic(data, color = "Gender", fill = "Attitude", by = "Community")
p6

请注意，上述代码需要替换为实际的数据内容。如果你需要进一步的帮助，记得提供数据的结构和具体例子。