Re: split a number to Date format
- To: mathgroup at smc.vnet.net
- Subject: [mg124242] Re: split a number to Date format
- From: Peter Breitfeld <phbrf at t-online.de>
- Date: Sat, 14 Jan 2012 17:08:20 -0500 (EST)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- References: <jercf9$1aa$1@smc.vnet.net>
Derek Martin wrote:
> I have experimental data in spreadsheet format. The first column is a
> time stamp in the format 111205020000. If I could parse or split the
> number 111205020000 into {11,12,05,02,00,00} and replace the first 11
> with 2011, the Date commands would work fine. I can do the replacing,
> but am having difficulty seeing how to split the number into
> {11,12,05,02,00,00}.
>
> DateString[{2011, 12, 05, 02, 00, 00}] gives
> "Mon 5 Dec 2011 02:00:00"
>
> Any help to convert my number to the right Date format would be
> appreciated. I am using Mathematica 8.
>
> Thanks in Advance
> Derek
>
Maybe like this:
In[59]:= dorg = "111205020000"
Out[59]= "111205020000"
In[63]:= ds =
ToExpression /@
MapAt[StringJoin["20", #] &,
StringJoin /@ Partition[Characters[dorg], 2], 1]
Out[63]= {2011, 12, 5, 2, 0, 0}
In[64]:= DateString[ds]
Out[64]= "Mon 5 Dec 2011 02:00:00"
--
_________________________________________________________________
Peter Breitfeld, Bad Saulgau, Germany -- http://www.pBreitfeld.de