MathGroup Archive 2004

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

Search the Archive

Re: To create {{},{},....{}} beyond $MaxRecursionLimit




This method will still complain if you ask for a list of a length greater
than $MaxRecursionLimit, but you don't need to change $MaxRecursionLimit to
Infinity if you don't want.  Just pick a number one greater than the length
of the list you want to make ; )


J疣os wrote:
> Hi,
> I am in need of creating a nested list in  the form of {{},{},....{}}
> of arbitrary length where none of the sublists have any element in it.
> I came up with
> lst = NestList[List, {},lengthlist - 1]
> For[i = 2, i <=
>      lengthlist, i++, flt = Table[{j}, {j, i, lengthlist}]; lst =
> FlattenAt[lst, flt]]
> however it complains  when lengthlen is over $MaxRecursionLimit.  I
> see that I can change that Limit to Infinity, but I rather would not
> go that route.  It must be a better way without using NestList.
> Any good hint ?
> Thanks ahead,
> J疣os
> -------------------------------------------------
> clear perl code is better than unclear awk code; but NOTHING comes
> close to unclear perl code

  • Prev by Date: Re: simple bug about Sum/Product function?
  • Next by Date: Re: To create {{},{},....{}} beyond $MaxRecursionLimit
  • Previous by thread: To create {{},{},....{}} beyond $MaxRecursionLimit
  • Next by thread: Re: To create {{},{},....{}} beyond $MaxRecursionLimit