如何将变量名及其结果插入到R中的绘图中

# 示例数据
x <- 1:10
y <- x^2

# 创建绘图
plot(x, y)

# 添加变量名及其值
text(5, max(y), paste("x =", x[1]), pos = 4)
text(5, max(y) - 10, paste("y =", y[1]), pos = 4)

# 创建绘图
plot(x, y)

# 在绘图边缘添加变量名及其值
mtext(paste("x =", x[1]), side = 3, line = 0.5)
mtext(paste("y =", y[1]), side = 3, line = 0.5)

# 安装并加载ggplot2包
install.packages("ggplot2")
library(ggplot2)

# 创建数据框
df <- data.frame(x = x, y = y)

# 创建绘图
p <- ggplot(df, aes(x = x, y = y)) +
  geom_point() +
  annotate("text", x = 5, y = max(y), label = paste("x =", x[1])) +
  annotate("text", x = 5, y = max(y) - 10, label = paste("y =", y[1]))

# 显示绘图
print(p)