我有一个模型输出的时间列表，这些时间采用十进制数字格式，表示从模型开始运行的时间，单位为小时，但输出中没有给出任何单位，它们只是数字。
我想做的是将这些数字转换为日期戳格式，使用这些数字作为模型运行的小时数。特别是作为POSIXct或Date变量，这样我就可以开始使用Bupar库了。
例如，我想将1.75转换为1小时45分钟，将25.5转换为1天1小时30分钟。
感谢的帮助
一种可能的方法：
我们可以使用lubridate的seconds_to_period()函数乘以3600得到秒：
library(lubridate)
x <- 1.75
seconds_to_period(x*3600)
#[1] "1H 45M 0S"