Среднее время - hh: mm: ss - группа по переменной

Question

Нужно вычислить среднее значение Time by Country. Время - переменная даты - hh: mm: ss.

Эта команда with(df,tapply(as.numeric(times(df$Time)),Country,mean)) не возвращает правильное среднее значение в чч: мм: сс.

Country Time 
1 Germany 2:26:21 
2 Germany 2:19:19 
3 Brazil 2:06:34 
4 USA  2:06:17 
5 Eth  2:18:58 
6 Japan 2:08:35 
7 Morocco 2:05:27 
8 Germany 2:13:57 
9 Romania 2:21:30 
10 Spain 2:07:23 

Выход:

>with(df,tapply(as.numeric(times(df$Time)),Country,mean)) 
     Andorra  Australia  Brazil  Canada   China 
    0.09334491 0.09634259 0.09578125 0.09634645 0.09481192 
     Eritrea  Ethiopia  France  Germany Great Britain 
    0.09709491 0.09010031 0.10025463 0.09713349 0.09524306 
     Ireland   Italy   Japan   Kenya  Morocco 
    0.09593750 0.09520255 0.09579630 0.08934854 0.09400463 
    New Zeland   Peru  Poland  Romania  Russia 
    0.09664931 0.09809606 0.09638889 0.09875000 0.09327932 
     Spain Switzerland  Uganda United States  Zimbabwe 
    0.09314236 0.09620949 0.10068287 0.09399016 0.09892940 

Answer 1

Вы пытаетесь сделать это -

dades$Time <- strptime(dades$Time,'%H:%M:%S') 
by(dades$Time, dades$Country, mean) 

Если бы я не понял ваш вопрос, пожалуйста, вы можете опубликовать пример вывода.

Answer 2

Я вижу, вы обнаружили агонию работы с значениями даты и времени в R ...

Это то, что вы имели в виду?

df$nTime <- difftime(strptime(df$Time,"%H:%M:%S"), 
        strptime("00:00:00","%H:%M:%S"), 
        units="secs") 
df.means <- aggregate(df$nTime,by=list(df$Country),mean) 
df.means$Time <- format(.POSIXct(df.means$x,tz="GMT"), "%H:%M:%S") 
df.means 
    Group.1   x  Time 
# 1 Brazil 7594.000 02:06:34 
# 2  Eth 8338.000 02:18:58 
# 3 Germany 8392.333 02:19:52 
# 4 Japan 7715.000 02:08:35 
# 5 Morocco 7527.000 02:05:27 
# 6 Romania 8490.000 02:21:30 
# 7 Spain 7643.000 02:07:23 
# 8  USA 7577.000 02:06:17 

Первая строка добавляет столбец nTime, который соответствует времени, в секундах, начиная с полуночи. Вторая строка вычисляет средства. Третья строка преобразуется обратно в H: M: S.

Проблема вы имели это strptime(...), когда вынуждены конвертировать в числовой, возвращает число вторых между 1970-01-01 и указанное время сегодня. Итак, действительно большое число. Этот код просто вычитает число секунд от 1970-01-01 и 00:00:00 сегодня.