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