R_Language 板


LINE

我也來問問, readxl::read_excel 讀入日期/時間的精準度的問題 偶而還是會遇到讀取Excel的情形 在Windows下,讀MS Excel創造出來的 YYYY-mm-dd HH:MM:SS 這種格式 例:讀取內容 2009-01-03 07:00:00 col_type 1. date: 2009-01-03 06:59:59 2. text: 39997.291666666664 3. numeric: 39997.29 用text屬性差距很少, 但也不是7點整, 因為7/24不能整除. 7/24 = 0.291666666667 (0.291666666664)*24 = 6.999999999936 不知是微軟的問題還是誰的問題. (Excel好像存到小數點十位(且是用截斷的方式), 但用readxl讀進來卻是12位) 因為我處理的資料都是整點, 也就偷懶這樣處理了. 這支function還有別的用途, 才寫成這樣. 在這邊功能是一樣的就直接貼上來了. TS是 POSIX 格式: redaxl::read_excel(file, col_type="date") TS2Oclock <- function (TS) { MM = as.numeric(format(TS, "%M"))/60; MM[MM>=0.5] <- 1; MM[MM<0.5] <- 0 HH = as.numeric(format(TS, "%H")) + MM TS = as.POSIXct(paste(format(TS, "%Y-%m-%d")," ", HH, ":00",sep="")) } TS2Oclock(as.POSIXct(2009-01-03 06:59:59)) 各位用哪支function去重新處理? 我知道用 csv 且用ISOdatetime格式儲存就沒有這種問題, 但總會遇到excel ※ 引述《clansoda (小笨)》之銘言: : 各位好,我有個xls檔案,他是用general格式去儲存時間格式 : 所以外部顯示會長得像2016/06/21 11:39:25 AM 這樣 : 但其實裡面是用電腦化的紀錄時間會變成42535.49413 : 這個應該是以1990-01-01為止到現在的天數 所以是 : 42535.49413天從那天算起,我用readxl的read_excel讀入 : 但是他的function在讀入的時候只會讀入兩個小數點 : 因此會變成42535.49天,接著我用openxlsx的convertDateTime : 將這個數字轉換成我們和R看得懂的格式,結果雖然前面都一樣 : 但是差三位小數導致真實的時間差了五分鐘,如果我想將這個數字導正 : 請問除了直接在excel加工之外還有其他的方法嗎,openxlsx的read.xlsx : 我已經試過了,但是他一直顯示亂碼,我不確定是不是中文太多導致 : 他沒有可以encoding的選項,而xlsx的read.xlsx是太慢無法使用 : 如果要人工去調整excel會很辛苦,因為數量不小 : 不知道有沒有人知道如何解決這個問題呢? --



※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 140.112.64.48
※ 文章網址: https://webptt.com/m.aspx?n=bbs/R_Language/M.1466676393.A.00C.html ※ 編輯: Edster (140.112.64.48), 06/23/2016 18:11:36 ※ 編輯: Edster (140.112.64.48), 06/23/2016 18:12:00 ※ 編輯: Edster (140.112.64.48), 06/23/2016 18:52:45
1F:推 clansoda: 所以是差一秒嗎? 我的也會 就是讀近來會差一秒 06/23 19:22
2F:→ Edster: 差約5微秒. 資料先處理成 YYYY mm dd HH MM SS 六個欄位 06/23 19:36
3F:→ Edster: 好像是Excel儲存時間最沒問題的方式. 06/23 19:36
4F:→ Edster: 我自己平常是直接存成YYYYmmddHH 這樣存成一欄. 06/23 19:37
5F:→ Edster: 讀進來後再自己切. 用 strptime 06/23 19:38
6F:推 clansoda: 痾 看不太懂 我自己是只存一欄 他是以EXCEL 1990年為起 06/23 19:59
7F:→ clansoda: 點,再用openxlsx 為converttoDatetime 這個function 06/23 19:59
8F:→ clansoda: 我好像取到第六位會差一秒,明天可以試試取到第十位 06/23 20:00
9F:→ clansoda: 但是因為我這個資料對時間沒有敏感到秒這麼誇張,差一秒 06/23 20:00
10F:→ clansoda: 我可能就讓他去了吧 06/23 20:00
11F:→ Edster: 因為我是用時間做ID把兩組資料拼在一起. 才會這麼在意 06/23 20:04
12F:→ Edster: 如果你只有一個excel檔案的話, 存成 YYYYmmddHH 之類的 06/23 20:06
13F:→ Edster: 中間沒有 / : 跟空格. 之類的東西, 就是一串10碼數字. 06/23 20:07







like.gif 您可能會有興趣的文章
icon.png[問題/行為] 貓晚上進房間會不會有憋尿問題
icon.pngRe: [閒聊] 選了錯誤的女孩成為魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一張
icon.png[心得] EMS高領長版毛衣.墨小樓MC1002
icon.png[分享] 丹龍隔熱紙GE55+33+22
icon.png[問題] 清洗洗衣機
icon.png[尋物] 窗台下的空間
icon.png[閒聊] 双極の女神1 木魔爵
icon.png[售車] 新竹 1997 march 1297cc 白色 四門
icon.png[討論] 能從照片感受到攝影者心情嗎
icon.png[狂賀] 賀賀賀賀 賀!島村卯月!總選舉NO.1
icon.png[難過] 羨慕白皮膚的女生
icon.png閱讀文章
icon.png[黑特]
icon.png[問題] SBK S1安裝於安全帽位置
icon.png[分享] 舊woo100絕版開箱!!
icon.pngRe: [無言] 關於小包衛生紙
icon.png[開箱] E5-2683V3 RX480Strix 快睿C1 簡單測試
icon.png[心得] 蒼の海賊龍 地獄 執行者16PT
icon.png[售車] 1999年Virage iO 1.8EXi
icon.png[心得] 挑戰33 LV10 獅子座pt solo
icon.png[閒聊] 手把手教你不被桶之新手主購教學
icon.png[分享] Civic Type R 量產版官方照無預警流出
icon.png[售車] Golf 4 2.0 銀色 自排
icon.png[出售] Graco提籃汽座(有底座)2000元誠可議
icon.png[問題] 請問補牙材質掉了還能再補嗎?(台中半年內
icon.png[問題] 44th 單曲 生寫竟然都給重複的啊啊!
icon.png[心得] 華南紅卡/icash 核卡
icon.png[問題] 拔牙矯正這樣正常嗎
icon.png[贈送] 老莫高業 初業 102年版
icon.png[情報] 三大行動支付 本季掀戰火
icon.png[寶寶] 博客來Amos水蠟筆5/1特價五折
icon.pngRe: [心得] 新鮮人一些面試分享
icon.png[心得] 蒼の海賊龍 地獄 麒麟25PT
icon.pngRe: [閒聊] (君の名は。雷慎入) 君名二創漫畫翻譯
icon.pngRe: [閒聊] OGN中場影片:失蹤人口局 (英文字幕)
icon.png[問題] 台灣大哥大4G訊號差
icon.png[出售] [全國]全新千尋侘草LED燈, 水草

請輸入看板名稱,例如:e-shopping站內搜尋

TOP