How to convert time to days
The word "secs" appears in "Run time: 1.960625 secs" because you put
it there in your cat() statement. It has nothing to do with the
number itself.
Simply try typing
end.time - begin.time
at the prompt, and see what you get.
Then see
?difftime
for more information. Example
difftime(end.time,begin.time,units='hours')
To get the interval formatted as "1 day, 23 hours, x minutes, x
seconds" you will have to do more work.
-Don
At 4:18 PM +0200 10/26/05, Muhammad Subianto wrote:
Dear all,
I have ran a simulation in R.
This simulation was running about at least two days.
Here is below the result some part of my code about time result.
I don't understand about
Start time: Mon Oct 24, 2005 at 04:23:01 PM
Finish time: Wed Oct 26, 2005 at 03:26:19 PM
Run time: 1.960625 secs.
This is about two seconds or one day and nine hours?
Then, how could I convert to 1 day, 23 hours, ? minutes, ? seconds.
Thanks you very much for any suggestions.
Best wishes, Muhammad Subianto
>
################################################################################
> # Begin of program and timestamp: > cat(format(begin.time <- Sys.time(), "%a %b %d %X %Y") ,"\n")
Mon Oct 24 04:23:01 PM 2005
> cat("Start time:", secs <- format(begin.time, "%X"), "\n")
Start time: 04:23:01 PM
> cat("Sys.time:", begin.time <- Sys.time(), '\n')
Sys.time: 1130163781
> >
--- CODE SIMULATION ---
>
> # End of program and timestamp:
> cat("Sys.time:",end.time <- Sys.time(), '\n')
Sys.time: 1130333179
> cat("Run Time:",end.time-begin.time, 'secs.\n\n')
Run Time: 1.960625 secs.
> cat("Finish time:", secs <- format(end.time, "%X"), "\n")
Finish time: 03:26:19 PM
> cat(format(end.time <- Sys.time(), "%a %b %d %X %Y") ,"\n")
Wed Oct 26 03:26:19 PM 2005
>
> cat("\n",
+ " Start time:", secs <- format(begin.time, "%a %b %d, %Y at
%X"), "\n",
+ "Finish time:", secs <- format(end.time, "%a %b %d, %Y at
%X"), "\n",
+ " Run time:", end.time-begin.time, 'secs.\n\n')
Start time: Mon Oct 24, 2005 at 04:23:01 PM
Finish time: Wed Oct 26, 2005 at 03:26:19 PM
Run time: 1.960625 secs.
>
###########################################################################
______________________________________________ R-help at stat.math.ethz.ch mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
-------------------------------------- Don MacQueen Environmental Protection Department Lawrence Livermore National Laboratory Livermore, CA, USA