2016-09-28 14 views
5

Próbuję usunąć sekund z kolumny godzin w formacie POSIXct:Usuń sekund od czasu w R

#"2016-04-02 10:33:45 COT" "2016-04-02 22:19:24 COT" 
#"2016-04-09 17:47:13 COT" "2016-04-13 16:56:23 COT" 

x <- structure(c(1459589625, 1459631964, 1460220433, 1460562983), 
    class = c("POSIXct", "POSIXt"), tzone = "") 

Próbuję to, ale nie widzę wyniki:

y <- as.POSIXct(x, format = "%d/%m/%Y %H:%M") 

Odpowiedz

3

Nie dajesz as.POSIXct błędne Format ...

Co o użyciu formatu

datetimes = as.POSIXct(c("2016-04-02 10:33:45 COT", "2016-04-02 22:19:24 COT" ,"2016-04-09 17:47:13 COT", "2016-04-13 16:56:23 COT")  
format(datetimes,format='%Y%m%d %H:%M') 

[1] "20160402 10:33" "20160402 22:19" "20160409 17:47" "20160413 16:56" 
+0

wydają się być brakuje prawego nawiasu na pierwszej linii. Nic wielkiego, nadal bardzo pomocne! – EntryLevelR

0

Jeśli chcesz zaokrąglić datę minut można to zrobić:

x <- as.POSIXlt(c("2016-04-02 10:33:45 COT")) 
    res <-as.POSIXlt(floor(as.double(x)/60) * 60, origin = '1970-01-01') 
    res 
    # "2016-04-02 10:33:00 BST" 
+0

Zobacz '% /%', aby nieco uprościć wyrażenie. –

0

Wystarczy użyć podciąg:

datetimes <- c("2016-04-02 10:33:45 COT", "2016-04-02 22:19:24 COT" , 
       "2016-04-09 17:47:13 COT", "2016-04-13 16:56:23 COT") 

as.POSIXct(substring(datetimes, 1, nchar(datetimes[1])-7)) 

#[1] "2016-04-02 10:33:00 IST" "2016-04-02 22:19:00 IST" 
# "2016-04-09 17:47:00 IST" "2016-04-13 16:56:00 IST" 

# without timezone 
format(substring(datetimes, 1, nchar(datetimes[1])-7), 
       format='%Y-%m-%d %H:%M:%S', usetz = FALSE) 
#[1] "2016-04-02 10:33" "2016-04-02 22:19" "2016-04-09 17:47" "2016-04-13 16:56" 
+1

Pokazany ciąg strefy czasowej nie daje tutaj pewności. –

+0

ok zaktualizowany zgodnie z wymaganiami –

1

można użyć round.POSIXt:

round(Sys.time(), units = "mins") 
#"2017-01-30 11:20:00 CET" 
+0

Jeśli używasz tej funkcji do manipulowania danymi.frame potrzebujesz dodatkowego pliku jak POSIXct, aby usunąć strukturę listy –

0

ten jest to, co masz:

x <- structure(c(1459589625, 1459631964, 1460220433, 1460562983), 
    class = c("POSIXct", "POSIXt"), tzone = "") 

To jest to, co chcesz:

x <- format(as.POSIXct(x), "%d-%m-%Y %H:%M") 
x 

[1] "02-04-2016 15:03" "03-04-2016 02:49" "09-04-2016 22:17" "13-04-2016 21:26" 
Powiązane problemy