r - R と XLConnect を使用して Excel 時間を読み取る

Question

R を使用して、12 時間形式 test.xlsx =>の時刻を含む 2 つの列を含む Excel ファイルを読み込んでいます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 のものと同じではありません。RIでしばらく苦労した後、次の解決策が得られました。

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 から時刻 (日時ではない) をインポートする簡単な方法はありますか?