Один из способов - захватить вывод из difftime
, используя capture.output
start_time <- as.POSIXct('2019-01-01 02:34:00')
end_time <- as.POSIXct('2019-01-01 03:14:00')
paste("Loop 5 took", capture.output(difftime(end_time, start_time)), "to run.")
#[1] "Loop 5 took Time difference of 40 mins to run."
. Теперь вы можете изменить вывод, чтобы сделать его осмысленным, скажем, удалить «Разницу во времени» из выход
sent <- capture.output(difftime(end_time, start_time))
paste("Loop 5 took",sub("Time difference of ","", sent) , "to run.")
#[1] "Loop 5 took 40 mins to run."
для другого входа
start_time <- as.POSIXct('2019-01-01 02:34:00')
end_time <- as.POSIXct('2019-01-01 02:34:50')
sent <- capture.output(difftime(end_time, start_time))
paste("Loop 5 took",sub("Time difference of ","", sent) , "to run.")
#[1] "Loop 5 took 50 secs to run."
git checkout HEAD~1
Это будет двигать Вашей текущей ГОЛОВОЙ к одному пересмотру ранее.
git checkout <sha>
Это будет двигать Вашей текущей ГОЛОВОЙ к данному пересмотру. Используйте git log
или gitk
для нахождения пересмотра you’re поиском.