Re: Defining Solve results as variable

*To*: mathgroup at smc.vnet.net*Subject*: [mg70040] Re: Defining Solve results as variable*From*: Roger Bagula <rlbagula at sbcglobal.net>*Date*: Sun, 1 Oct 2006 04:08:33 -0400 (EDT)*References*: <eflebs$deg$1@smc.vnet.net>

Diana wrote: >Hi, > >I am trying to write a program which defines a variable with the >results of a Solve equation. > >So, if I write > >Solve[x+1=2,x] > >I get {{x -> 1}} > >I have not been able to figure out how to define a variable to the >result, so that if I then type > >x1 = %, for example, it defines x1 as 1. > >I know this must be simple, but I didn't find it in the Help material. > >Thanks in advance, > >Diana > > > Here is some code that works with combinatorial triangular sequences: Table[Table[y[k_] = x /. Solve[Sum[Binomial[n, m]*x^m, {m, 0, n}] == 0, x][[k]], {k, 1, n}], {n, 1, 5}] Table[y[k], {k, 1, 5}] Clear[y] Table[y[k_] = x /. Solve[Sum[Binomial[n, m]*x^m, { m, 0, 5}] == 0, x][[k]], {k, 1, 5}] Table[y[k], {k, 1, 5}]