Re: Removing brakets of a list
- To: mathgroup at smc.vnet.net
- Subject: [mg48295] Re: Removing brakets of a list
- From: bghiggins at ucdavis.edu (Brian Higgins)
- Date: Sat, 22 May 2004 03:04:26 -0400 (EDT)
- References: <c8kd7c$msa$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Sebastian,
It is not clear from your post what you plan to do once the outer
bracket of your list have been removed. In general this is not
possible as every Mathematica expression must have a Head.
For printing purposes here is one way you can get the desired effect
expr = Flatten[Table[Subscript[x, i, j], {i, 1, 4}, {j, 1, 4}]]
Infix[expr, ","]
The output in this case has the FullForm
Infix[List[Subscript[x, 1, 1], Subscript[x, 1, 2], Subscript[
x, 1, 3], Subscript[x, 1, 4], Subscript[
x, 2, 1], Subscript[x, 2, 2], Subscript[
x, 2, 3], Subscript[x, 2, 4], Subscript[
x, 3, 1], Subscript[x, 3, 2], Subscript[
x, 3, 3], Subscript[x, 3, 4], Subscript[
x, 4, 1], Subscript[x, 4, 2], Subscript[
x, 4, 3], Subscript[x, 4, 4]], ","]
Note the Head of the expression in Infix
Cheers,
Brian