某研究团队研究了新疆南北疆山刺玫和野苹果树的分支数量、胸径、树高和冠幅，调查数据如图。请结合课程内容，R语言分析以下几个问题。

某研究团队研究了新疆南北疆山刺玫和野苹果树的分支数量、胸径、树高和冠幅，调查数据如图。请结合课程内容，R语言分析以下几个问题。

data <- read.csv("data.csv")
head(data)

1.树高在物种和地区的不同是否有差异？并绘图（25分）。

library(tidyverse)
data %>%
    ggplot(aes(x = 物种,y  = 树高,fill = 地区)) + geom_boxplot() + theme_test() + ggtitle("玛丽亚木制作：树高在物种和地区的箱线图")  + scale_fill_manual(values=c("red", "blue"))

在箱线图中看到， 树高在物种和地区的不同是有差