LINUX.ORG.RU

История изменений

Исправление psv1967, (текущая версия) :

> system.time(mapply("-",x[-1],x[-length(x)])[1])
пользователь      система       прошло 
       4.164        0.032        4.200 
> system.time("-"(x[-1],x[-length(x)])[1])
пользователь      система       прошло 
       0.084        0.004        0.088 
> system.time(diff(x)[1])
пользователь      система       прошло 
       0.088        0.000        0.087 

Исходная версия psv1967, :

> system.time(mapply("-",x[-1],x[-length(x)])[1])
пользователь      система       прошло 
       4.164        0.032        4.200 
> system.time("-"(x[-1],x[-length(x)])[1])
пользователь      система       прошло 
       0.084        0.004        0.088