Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2004
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2004

[Date Index] [Thread Index] [Author Index]

Search the Archive

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


  • Prev by Date: Compile
  • Next by Date: Re: Removing brakets of a list
  • Previous by thread: Removing brakets of a list
  • Next by thread: Re: Removing brakets of a list