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/