24大数据 散点图复习

散点图复习

运动时长与卡路里消耗关系

某健身房统计会员运动时长与消耗卡路里数据：

运动时长 (分钟)：20, 25, 30, 35, 40, 45, 50

消耗卡路里：100, 130, 160, 190, 220, 250, 280

1.绘制纯点散点图（type="p"）

2.标题：「运动时长与卡路里消耗关系」

3.x 轴标签：运动时长（分钟），y 轴标签：消耗卡路里

4.设置 x 轴范围：15~55，y 轴范围：80~300

5.点形状：实心正方形（pch=15）

参考代码

# 1. 数据定义
minute <- c(20, 25, 30, 35, 40, 45, 50)
calorie <- c(100, 130, 160, 190, 220, 250, 280)

# 2. 绘制散点图
plot(minute, calorie,
     type = "p",            # 只显示点
     main = "运动时长与卡路里消耗关系",
     xlab = "运动时长（分钟）",
     ylab = "消耗卡路里",
     xlim = c(15, 55),      # x轴范围
     ylim = c(80, 300),     # y轴范围
     pch = 15)              # 实心正方形

上半年订单量变化趋势

某网店月份与订单量数据：

月份：1, 2, 3, 4, 5, 6

订单量：50, 65, 80, 75, 90, 105

1.绘制点线图（点和线同时显示，type="o"）

2.标题：「上半年订单量变化趋势」

3.x 轴标签：月份，y 轴标签：订单量

4.点形状：实心圆（pch=16）

5.线条样式：虚线（lty=2）

# 1. 数据定义
month <- c(1, 2, 3, 4, 5, 6)
order_num <- c(50, 65, 80, 75, 90, 105)

# 2. 绘制点线图
plot(month, order_num,
     type = "o",            # 点+线
     main = "上半年订单量变化趋势",
     xlab = "月份",
     ylab = "订单量",
     pch = 16,              # 实心圆
     lty = 2)               # 虚线

植物生长周数与高度关系

植物生长高度随周数变化数据：

周数：1, 2, 3, 4, 5, 6, 7, 8

高度 (cm)：5, 8, 12, 16, 21, 25, 29, 32

1.绘制纯点散点图

2.标题：「植物生长周数与高度关系」

3.x 轴范围：0~10，y 轴范围：0~35

4.点形状：空心圆（pch=1）

5.自定义坐标轴标签

# 1. 数据定义
week <- c(1, 2, 3, 4, 5, 6, 7, 8)
height <- c(5, 8, 12, 16, 21, 25, 29, 32)

# 2. 绘图
plot(week, height,
     type = "p",
     main = "植物生长周数与高度关系",
     xlab = "生长周数",
     ylab = "植株高度（cm）",
     xlim = c(0, 10),
     ylim = c(0, 35),
     pch = 1)      # 空心圆