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.
> Thanking you in advance.
> TKG.
>