r语言柱状图和折线图绘制在一张图上
时间: 2023-10-06 17:07:03 浏览: 178
画柱状图,折线图
4星 · 用户满意度95%
你可以使用ggplot2包来在同一张图上绘制柱状图和折线图。下面是一个简单的示例代码:
```R
library(ggplot2)
# 创建数据
df <- data.frame(month = factor(c("Jan", "Feb", "Mar", "Apr", "May", "Jun")),
sales = c(20, 25, 30, 35, 40, 45),
profit = c(5, 10, 15, 20, 25, 30))
# 绘制柱状图
p <- ggplot(df, aes(x = month, y = sales)) +
geom_bar(stat = "identity", fill = "steelblue") +
ylab("Sales")
# 绘制折线图
p <- p + geom_line(aes(x = month, y = profit * 4), color = "red") +
ylab("Profit")
# 设置坐标轴和图例标签
p <- p + scale_y_continuous(sec.axis = sec_axis(~./4, name = "Profit")) +
xlab("Month") +
theme(legend.position = "bottom")
# 显示图形
p
```
这个代码将在同一张图上绘制柱状图和折线图,其中折线图的y轴使用了一个辅助轴。你可以根据自己的需求修改数据和绘图参数。
阅读全文