使用R和XLConnect读取Excel时间

Question

我正在使用R来读取包含两列12列格式的Excel文件的文件
test.xlsx =＆gt; A1: 1:40:50 p.m. A2: 00:00:00 a.m.。

我已经安装了XLConnect包来读取文件，所以我编写了这个脚本：

library(XLConnect)
a <- readWorksheetFromFile("test.xlsx",sheet=1, header=F)

我从中得到的是：

                   Col1                  Col2
1   1899-12-31 12:24:02   1899-12-30 22:43:12

这些时间值与Excel中的时间值不同。在与R挣扎了一段时间后，我得到了以下解决方案：

t <- as.POSIXct((as.numeric(a[1,1])-as.numeric(b))
                ,origin = "1900-01-01 00:00:00",tz="UCT")
print(t)
[1] "1900-01-01 13:40:50 UCT"

这等于单元格A1中的时间。

我的问题是：是否有更简单的方法从Excel导入时间（不是日期时间）？