Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2002
*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 2002

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

Search the Archive

RE: Table using as iterator a multiple of 10, 100, ...,10^n

  • To: mathgroup at smc.vnet.net
  • Subject: [mg37153] RE: [mg37131] Table using as iterator a multiple of 10, 100, ...,10^n
  • From: "David Park" <djmp at earthlink.net>
  • Date: Sun, 13 Oct 2002 05:56:44 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

Guillermo,

This might be considered slightly better..

TableForm[{#, x[#], y[#], z[#]} & /@
    Join[Range[10], Range[20, 100, 10], Range[200, 1000, 100]],
  TableHeadings -> {None, {"d", "X", "Y", "Z"}}]

David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/



From: guillerm at usal.es [mailto:guillerm at usal.es]
To: mathgroup at smc.vnet.net

Dear friends,
I have build a table with this pattern:

Flatten[{{{"d", "X", "Y", "Z"}},
      Table[{t, x[t], y[t], z[t]}, {t, 1, 10}],
      Table[{t, x[t], y[t], z[t]}, {t, 20, 100, 10}],
      Table[{t, x[t], y[t], z[t]}, {t, 200, 1000, 100}]}, 1] // TableForm

I would like obtain the same Output in a more elegant way. In other word,
how
Can I avoid write "Table[{t, x[t], y[t], z[t]}" a few times.

Thans

Guillermo
Sanchez

---------------------------------------------
This message was sent using Endymion MailMan.
http://www.endymion.com/products/mailman/





  • Prev by Date: Re: Complex numbers
  • Next by Date: Re: Newbie mathematica question
  • Previous by thread: Re: Table using as iterator a multiple of 10, 100, ...,10^n
  • Next by thread: Re: Table using as iterator a multiple of 10, 100, ...,10^n