Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2002
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2002

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

Search the Archive

Re: Substitution!!!

  • To: mathgroup at smc.vnet.net
  • Subject: [mg35672] Re: Substitution!!!
  • From: bghiggins at ucdavis.edu (Brian Higgins)
  • Date: Thu, 25 Jul 2002 04:46:07 -0400 (EDT)
  • References: <ahlhov$s7t$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Chekad, Try this

mypoly = {1 + x, 1 + x + x^2, 1 + x + x^3, 1 + x^2 + x^3, 1 + x + x^6,
    1 + x^3 + x^6, 1 + x + x^2 + x^4 + x^6, 1 + x + x^3 + x^4 + x^6,  1 +
x^5 + x^6, 1 + x + x^2 + x^5 + x^6,  1 + x^2 + x^3 + x^5 + x^6, 1 + x + x^4
+ x^5 + x^6,   1 + x^2 + x^4 + x^5 + x^6};

mysub = {S_1, S_2, S_3, S_4, S_5, S_6, S_7, S_8, S_9, S_10, S_11, S_12, S_13, 
      S_14};

In[4]:=ReplacePart[mypoly, mysub, Partition[Range[Length[mypoly]], 1], 
  Partition[Range[Length[mypoly]], 1]]

Out[4]={S_, 2 S_, 3 S_, 4 S_, 5 S_, 6 S_, 7 S_, 8 S_, 9 S_, 10 S_, 11 S_, 12 S_, 
  13 S_}


Cheers,

Brian

"Chekad Sarami" <csarami at mtu.edu> wrote in message news:<ahlhov$s7t$1 at smc.vnet.net>...
> Hi,
> 
> 
> I have a question regarding substitute of an expression with index
> variables..I need to make a table for some products of irreducible
> polynomials (Irreducible factors of x^63 -1) . But they are so large and I
> can't fit them into the columns of my table.  So I need to use these
> substitutions
> 
> {S_1, S_2, S_3, S_4, S_5, S_6, S_7, S_8, S_9, S_10, S_11, S_12, S_13, S_14}
> : ------>  {1 + x, 1 + x + x^2, 1 + x + x^3, 1 + x^2 + x^3, 1 + x + x^6,
>     1 + x^3 + x^6, 1 + x + x^2 + x^4 + x^6, 1 + x + x^3 + x^4 + x^6,  1 +
> x^5 + x^6, 1 + x + x^2 + x^5 + x^6,  1 + x^2 + x^3 + x^5 + x^6, 1 + x + x^4
> + x^5 + x^6,   1 + x^2 + x^4 + x^5 + x^6}
> 
> 
> 
> ***** The right side is a list of irreducible polynomials which is assigned
> to {S_1, S_2,.... S_14}.*******
> 
> 
> 
> For example instead of putting this large expression (1 + x)  (1 + x + x^2)
> (1 + x + x^3) (1 + x + x^6) (1 + x^3 + x^6) (1 + x + x^2 + x^4 +  x\^6) (1 +
> x + x^3 + x^4 + x^6) (1 + x + x^2 + x^5 + x^6) in my table I can write it in
> tems of S_i's  in this form  S_1 S_2 S_3 S_4 S_5 S_6 S_7 S_8.
> 
> 
> 
> I tried ReplaceAll  but it changes  i.e. the above example to S_1 (S_1+x^3)
> (S_1+x_6) .... Which is not what I want.
> 
> Can anybody tell me how to do this.
> 
> 
> 
> 
> 
> Regards
> 
> CHEKAD


  • Prev by Date: Re: Beginners Question - Series list problem
  • Next by Date: Re: Substitution!!!
  • Previous by thread: Re: Substitution!!!
  • Next by thread: Re: Substitution!!!