R新手求助：如何以小时和分钟为横轴绘制速度折线图？

嘿，作为R语言新手，咱们一步步搞定这个折线图问题～

首先，你的数据里hour和min是分开的时间字段，直接用它们当横轴会很别扭——毕竟时间是连续的，咱们得先把这两列合并成一个连续的时间变量，这样折线图的横轴才能正确体现时间的先后顺序。

步骤1：准备工作（加载工具包） #

咱们用最常用的ggplot2包来画图，先确保它已经安装并加载：

# 如果还没安装ggplot2，先运行这行
install.packages("ggplot2")
# 加载包
library(ggplot2)

步骤2：合并时间字段 #

有两种常见的方式处理时间：

方式一：转换成总分钟数（简单直观）

把hour转换成分钟，加上min，得到从0开始的连续分钟数，适合快速绘图：

# 假设你的数据框叫df，先创建总分钟数字段
df$total_min <- df$hour * 60 + df$min

方式二：转换成标准时间格式（更易读）

如果想让横轴显示类似1:00、1:30这样的时间标签，可以转换成POSIXct格式：

# 随便选一个日期（不影响，只是为了生成标准时间格式）
df$time <- as.POSIXct(paste("2024-01-01", df$hour, df$min, sep=":"), format="%Y-%m-%d:%H:%M")

步骤3：绘制折线图 #

情况1：整体时间序列（不按UserID分组）

如果你的UserID只是行号，想把所有时间点的velocity连成一条线：

ggplot(df, aes(x = time, y = velocity)) +
  geom_line(color = "#2E86AB", linewidth = 1) +  # 设置线条颜色和粗细
  labs(x = "时间", y = "速度", title = "速度随时间变化折线图") +
  theme_minimal() +  # 用简洁的主题
  scale_x_datetime(date_labels = "%H:%M")  # 横轴显示小时:分钟格式

情况2：按UserID分组绘制多条线

如果UserID代表不同的用户/对象，想给每个对象画一条折线：

ggplot(df, aes(x = time, y = velocity, group = UserID, color = UserID)) +
  geom_line(linewidth = 1) +
  labs(x = "时间", y = "速度", title = "不同对象的速度随时间变化", color = "用户ID") +
  theme_minimal() +
  scale_x_datetime(date_labels = "%H:%M")

备选：用基础绘图系统（不用ggplot2） #

如果你暂时不想学ggplot2，用R自带的绘图工具也能搞定：

# 先按时间排序数据，不然折线会乱跳
df_sorted <- df[order(df$hour, df$min), ]
# 创建时间标签
df_sorted$time_label <- paste(df_sorted$hour, df_sorted$min, sep=":")
# 绘制折线图
plot(df_sorted$time_label, df_sorted$velocity, type = "l", 
     xlab = "时间", ylab = "速度", main = "速度随时间变化折线图",
     col = "blue", lwd = 2)

最后提醒一下：如果你的数据里有重复的时间点，记得先处理好（比如取平均值），不然折线图可能会出现奇怪的波动哦～

内容的提问来源于stack exchange，提问作者user147460