時間格式跑出1899-12-30

43 views
Skip to first unread message

YT

unread,
Jun 5, 2020, 11:45:47 PM6/5/20
to R軟體使用者論壇
請問當初匯入xlsx檔案時,時間那欄僅輸入09:46:00並將格式改為時間,但匯入R後跑出了1899-12-30 09:46:00,爬了很多文感覺不是轉換時區的問題,想只擷取部分時間,但對於R程式仍不熟悉的我,請問可以如何做才能僅顯示時間09:46:00,請各位協助我!!!感激不盡!!!
未命名.png

WEPA ^_^

unread,
Jun 6, 2020, 11:05:53 PM6/6/20
to R軟體使用者論壇
Hi YT,

1. 考慮以下 Excel 檔案, 資料顯示時, 分
檔名: 時間格式.xlsx

時間格式-excel.png


2. 使用 format 函數顯示時間結果:

時間格式-R.png


# title: 時間格式
# date: 2020.6.7

library(readxl)

mydf <- read_excel("時間格式.xlsx")

str(mydf)

mydf

# 取出時間格式
mydf$TimeOny <- format(mydf$Time,  format="%H:%M")

mydf
# end

YT於 2020年6月6日星期六 UTC+8上午11時45分47秒寫道:
時間格式.xlsx

YT

unread,
Jun 8, 2020, 4:27:15 AM6/8/20
to R軟體使用者論壇
感謝WEPA^_^的回覆!!!已順利解決此問題!!!
但還有一個問題麻煩您替我解惑:
我想將日期那欄鎖住,
加上了這程式tw2327 <- xts(tw2327[,-1],order.by=as.Date(tw2327$Date))
欄中除了顯示日期外,後方還有顯示列數,
請問有什麼方式可以僅顯示日期嗎?
我利用先前格式改成mydf$DateOny <- format(mydf$DateOny ,  format="%Y-%m-%d")
想說將格式設定住後再鎖住那欄,
格式應該可以只顯示日期,
但發現情況依舊沒變....
0.png

WEPA ^_^

unread,
Jul 10, 2020, 8:03:13 AM7/10/20
to R軟體使用者論壇
Hi YT,

參考以下使用 xts, mydf1 並不會有顯示列數, 問題應該是 tw2327 資料物件格式, 請再提供模擬或部份資料或 RData檔案.

> library(xts)
> mydf1 <- xts(mydf[-1], order.by=as.Date(mydf$Date))
> mydf1
           Time                  Open    High  TimeOny
2020-05-29 "2020-05-29 09:46:00" "367.5" "370" "09:46"
2020-05-29 "2020-05-29 09:47:00" "367.5" "370" "09:47"
2020-05-29 "2020-05-29 09:48:00" "367.5" "371" "09:48"

YT於 2020年6月8日星期一 UTC+8下午4時27分15秒寫道:
Reply all
Reply to author
Forward
0 new messages