MathGroup Archive 1999

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

Search the Archive

Re: Finding lengths of identical sequences in lists


Hope this helps:

A = {3,2,2,3,3,3,1};
Length /@ Split[A]

Maris Tonso


Joel Cannon wrote:

> I am looking for a more elegant solution to the following. I have a
> list (a list of positions at consecutive times).  I wish to create a
> new list of the length of each sequence of consecutive identical
> members (including those of length 1).
>
> For example, for the list {3,2,2,3,3,3,1} I would create the list
> {1,2,3,1} because the first 3 appears once, followed by two 2's,
> etc. The lists I was working with contained a list of numbers
> (e.g. {{x1,y1},{x2,y2},...} rather than simple numbers. I accomplished
> this using a while loop, but I suspect there are better ways to do
> this using pattern matching or other approaches.
>
> Thanks much.
>
> ------------------------------------------------------------------------------
> Joel W. Cannon                   |   (724)223-6146
> Dept. of Physics                 |
> Washington and Jefferson College |
> Washington, PA 15301             |
>
>




  • Prev by Date: Vector plot in cylindrical coordinates.
  • Next by Date: Re: Importing 16-bit TIFF files with 4.0
  • Previous by thread: Finding lengths of identical sequences in lists
  • Next by thread: Re: Finding lengths of identical sequences in lists