Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2007
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2007

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Sorting by date

  • To: mathgroup at smc.vnet.net
  • Subject: [mg72660] Re: Sorting by date
  • From: Bill Rowe <readnewsciv at sbcglobal.net>
  • Date: Sun, 14 Jan 2007 04:26:41 -0500 (EST)

On 1/13/07 at 4:17 AM, camartin at snet.net (Clifford Martin) wrote:

>I have a list of lists that looks like so:

>{{3, 137.5, 13978, {2005, 2, 8}}, {3, 138.5, 12519, {2005, 1, 4}},
>{3, 171.9, 15835, {2005, 4, 12}}, {3, 142.8, 17137, {2005, 11, 
>19}}, {3, 161.1, 18881, {2006, 1, 18}}, {3, 108.7, 20055, 
>{2006, 2, 28}},
>{3, 157, 21498, {2006, 9, 14}}, {3, 118.1, 10891, {2004, 11, 12}}}

>The last element per vector is a date. I'd like to sort the list so
>that the vectors are arranged in ascending order of date, i.e. the
>vector containing {2004,11,12}  should be first and and the vector
>containing {2006,9,14}  should be last. Any help would be
>appreciated.

Simply take advantage of the second argument to sort by 
supplying it a pure function that makes it simple to order 
dates. That is

Sort[data, OrderedQ@{FromDate@Flatten@{
       Last@#1, 0, 0, 0}, FromDate@Flatten@{Last@#2, 0, 0, 0}} &]

will do the trick

--
To reply via email subtract one hundred and four


  • Prev by Date: Re: sparsearray and its nonempty cells
  • Next by Date: Re: Limit and Root Objects
  • Previous by thread: Re: Sorting by date
  • Next by thread: Re: Sorting by date