用该文件和R语言绘制一个柱状图，不用ggplot2

好的，我们可以使用R语言的基本绘图函数来绘制柱状图。以下是具体的代码示例：

# 创建数据框
seed_data <- data.frame(
  Treatment = c("Refrigerated", "Untreated"),
  Germination_Rate = c(70, 30)
)

# 绘制柱状图
barplot(seed_data$Germination_Rate, 
        names.arg = seed_data$Treatment, 
        main = "Seed Treatment and Germination Rate",
        xlab = "Treatment",
        ylab = "Germination Rate (%)",
        col = c("lightblue", "lightgreen"),
        border = "black")

# 添加数值标签
text(x = barplot(seed_data$Germination_Rate, plot = FALSE), 
     y = seed_data$Germination_Rate + 2, 
     labels = paste(seed_data$Germination_Rate, "%"), 
     pos = 3, cex = 0.8)

这段代码首先创建了一个包含种子处理方法和发芽率的数据框，然后使用`barplot`函数绘制柱状图，并添加了图表标题、轴标签、颜色和边框。最后，通过`text`函数在每个柱子上方添加了数值标签。

你可以将这段代码复制到R环境中运行，以生成所需的柱状图。