Displaying 1 result from an estimated 1 matches for "viaisodate".
2008 Apr 10
1
ISOdate/ISOdatetime performance suggestions, other date/time questions
...%Y%m%d.%H%M%OS, e.g. 20080410.140444 for now, this is what 'ts' in the
example below is:
ts = 1e4*trunc(rnorm(50000,2008,2)) + 1e2*trunc(runif(50000,1,12)) +
trunc(runif(50000,1,28)) + 1e-2*trunc(runif(50000,1,24)) +
1e-4*trunc(runif(50000,1,60)) + 1e-6*runif(50000,1,60)
posix.viaISOdate = function(x) {
date = trunc(x at .Data)
time = round(1e6*x at .Data%%1,2)
rtime = round(time)
z = list(sec=rtime%%1e2 + time%%1,
min=(rtime%/%1e2)%%1e2,
hour=rtime%/%1e4,
mday=date%%100,
mon=(date%/%100)%%100,
year=date%/%...