在R中，我如何比较两个连续变量并在图表中指示两个分类变量

# 加载所需的库
library(ggplot2)

# 创建示例数据
df <- data.frame(var1 = c(1, 2, 3, 4, 5),
                 var2 = c(2, 4, 6, 8, 10),
                 cat1 = c("A", "B", "A", "B", "A"),
                 cat2 = c("X", "Y", "X", "Y", "X"))

# 比较var1和var2的均值差异
t.test(df$var1, df$var2)

# 创建散点图
ggplot(df, aes(x = var1, y = var2, color = cat1, shape = cat2)) +
  geom_point() +
  labs(x = "Variable 1", y = "Variable 2", color = "Category 1", shape = "Category 2")

# 创建箱线图
ggplot(df, aes(x = cat1, y = var1, fill = cat2)) +
  geom_boxplot() +
  labs(x = "Category 1", y = "Variable 1", fill = "Category 2")