推 Edster: 所有時間減七小時，再取日期至整數 04/05 13:59
推 alex13587: 試試看用as.Date, 前提是你要先把妳的資料整理好：date 04/05 15:38
→ alex13587: s <- c("05/27/84", "07/07/05") 04/05 15:38
→ alex13587: betterDates <- as.Date(dates, 04/05 15:38
→ alex13587: format = "%m/%d/%y") 04/05 15:38
→ alex13587: format後面是你"輸入"的日期格式 04/05 15:39
> -------------------------------------------------------------------------- <
作者: celestialgod (天) 看板: R_Language
標題: Re: [問題] 時間做分類
時間: Wed Apr 5 19:33:47 2017
※ 引述《CAPPON (JI3)》之銘言：
: 我有一個data.frame
: 要將時間欄位做分類 , 以早上7點為卡點
: 用天來做分類
: 因為有 好幾萬筆的資料,如果用迴圈來判斷會比較麻煩
: 這可以怎麼做呢???
: 謝謝
: 2017-03-31 07:44:50.257375 --> 2017-03-31
: 2017-03-31 15:27:13.210377 --> 2017-03-31
: 2017-04-01 03:29:17.611750 --> 2017-03-31
: 2017-04-01 15:29:17.611750 --> 2017-04-01
: 2017-04-02 06:29:17.611750 --> 2017-04-01
library(lubridate)
timeStr <- c("2017-03-31 07:44:50.257375", "2017-03-31 15:27:13.210377",
"2017-04-01 03:29:17.611750", "2017-04-01 15:29:17.611750",
"2017-04-02 06:29:17.611750")
as_date(parse_date_time(timeStr, "YmdHMOS") - as.difftime(7, units = "hours"))
# [1] "2017-03-31" "2017-03-31" "2017-03-31" "2017-04-01" "2017-04-01"
--
R資料整理套件系列文：
magrittr #1LhSWhpH (R_Language) https://goo.gl/72l1m9
data.table #1LhW7Tvj (R_Language) https://goo.gl/PZa6Ue
dplyr(上.下) #1LhpJCfB,#1Lhw8b-s (R_Language) https://goo.gl/I5xX9b
tidyr #1Liqls1R (R_Language) https://goo.gl/i7yzAz
pipeR #1NXESRm5 (R_Language) https://goo.gl/zRUISx
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 118.170.38.47
※ 文章網址: https://www.ptt.cc/bbs/R_Language/M.1491392032.A.756.html
※ 編輯: celestialgod (118.170.38.47), 04/05/2017 19:36:24
推 zardabab: 解的漂亮! 04/07 13:29