Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2011

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

Search the Archive

Re: Table with conditions


Many thanks for the answers to my post. All the suggested solutions worked very well for my problem.
Jesus Rico-Melgoza

El 27/06/2011, a las 06:32, Heike Gramberg escribi=F3:

> 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]
>
>
> Heike.
>
> 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: Bug or limitation in Series?
  • Next by Date: Re: How can I concatenate elements
  • Previous by thread: Re: Table with conditions
  • Next by thread: Re: Table with conditions