MathGroup Archive 2011

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

Search the Archive

Re: Table with conditions

  • To: mathgroup at
  • Subject: [mg119878] Re: Table with conditions
  • From: Heike Gramberg <heike.gramberg at>
  • Date: Mon, 27 Jun 2011 07:32:33 -0400 (EDT)
  • References: <>

For each k you want -hi<=l<=hi, and -h-k<=l<=h-k. This can be combined to Max[-hi,-h-k]<=l<=Min[hi,h-k]].
You could therefore write P1 according to

P1 = Flatten[
  Table[{Pk[k].Fl[l], k + l}, {k, -h, h}, {l, Max[-hi, -h - k],
    Min[hi, h - k]}], 1]


On 26 Jun 2011, at 11:25, J. Jesus Rico Melgoza wrote:

> I am constructing a Table
> h=60
> hi=60
> P1 = Flatten[
>    Table[{Pk[k].Fl[l], k + l}, {k, -h,
>      h}, {l, -hi, hi}], 1]
> This yields a table with two columns. First column contains vector of order n and column 2 contains an scalar
> I want to add conditions to generate the elements in the Table
> -h<=k+l<=h.
> I do not know how to do this with the function Table[..] of Mathematica. I am asking for your help.
> I do not want rows in my table that do not satisfy the condition. 
> Pk[k] is matrix and Fl[l] is a column vector
> Thanks in advance
> Jesus Rico-Melgoza

  • Prev by Date: NSolve...
  • Next by Date: Re: Table with conditions
  • Previous by thread: Table with conditions
  • Next by thread: Re: Table with conditions