Re: split a number to Date format
- To: mathgroup at smc.vnet.net
- Subject: [mg124245] Re: split a number to Date format
- From: Bob Hanlon <hanlonr357 at gmail.com>
- Date: Sat, 14 Jan 2012 17:09:22 -0500 (EST)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- References: <201201140754.CAA01282@smc.vnet.net>
split1[x_] := ReplacePart[#, 1 -> First[#] + 2000] &[ FromDigits /@ Partition[IntegerDigits[x], 2]] split1[111205020000] {2011, 12, 5, 2, 0, 0} split2[x_] := MapAt[2000 + # &, FromDigits /@ Partition[IntegerDigits[x], 2], 1] split2[111205020000] {2011, 12, 5, 2, 0, 0} Bob Hanlon On Sat, Jan 14, 2012 at 2:54 AM, Derek Martin <cdmartin at me.com> 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 >
- References:
- split a number to Date format
- From: Derek Martin <cdmartin@me.com>
- split a number to Date format