Re: How to remove curly brackets and arrow symbols from a list.

• To: mathgroup at smc.vnet.net
• Subject: [mg58213] Re: How to remove curly brackets and arrow symbols from a list.
• From: dh <dh at metrohm.ch>
• Date: Thu, 23 Jun 2005 05:33:49 -0400 (EDT)
• References: <d9av83\$10a\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```Hi,
here is a simple example:
1) we define the function
2) we get the general solution depending on p
3) we prepend p
4) we cretae the table

f[x_] := x^2 + 2*x*p + 3
w = x /. Solve[f[x] == 0, x]
PrependTo[w, p]
Table[w /. p -> x, {x, 2, 5}] // TableForm

sincerely, Daniel

T. K. Ghosh wrote:
> Hi Math Guru,
>
> I will be very happy if you could help me to solve the following problem.
> The simplified version of my problem is the following.
> I have a quadratic equation with a parameter, say "p".
>
> Define the function:
> f[x_] := A*X^2 + B*X*p + D  with A, B and D are given.
> "p" is a parameter.
> I solve this equation for a given p:
> w = Solve[f[x]] == 0, X].
> Now I want to make a Table for the solutions of this
> quadratic equation for different values of "p".
> So I write,
> Table[{p,sol},{p,0,10,1}.
> I will get a table which will look like,
> 0   {w -> a}    {w -> -a}
> 1    {w -> b}    {w -> -b}
> 2    {w -> c}    {w -> -c}
> and so on.........
>
> How can I remove the curly brackets and the arrow symbol
> from the TableForm? I would like to plot the 1st column
> vs. 2nd or 3rd column. I must remove those brackets.
> and I wish to get the following form:
> 0  a  -a
> 1  b  -b
> 2  c  -c
>
>
> Hope this can be done easily which I am not aware.
> Any suggestion/solution to this problem is most welcome.