Re: About TableForm

*To*: mathgroup at smc.vnet.net*Subject*: [mg74364] Re: About TableForm*From*: bar at ANTYSPAM.ap.krakow.pl*Date*: Mon, 19 Mar 2007 21:49:52 -0500 (EST)*References*: <etlq33$r84$1@smc.vnet.net>

Evanescence <origine26 at yahoo.com.tw> wrote: > Hello Dear all: > My questions are as follows: > First I definition a function is f[x_,y_]:=2x+3y > Then I use the Table so: Table[f[x,y],{x,0,3,1},{y,0,4,2}] > Then we can get the answers :{{0,6,12},{2,8,14},{4,10,16},{6,12,18}} > But I want to get the form as follows: > x y f[x,y] > 0 0 0 > 0 2 6 > 0 4 12 > 1 0 2 > 1 2 8 > 1 4 14 > 2 0 4 > 2 2 10 > 2 4 16 > 3 0 6 > 3 2 12 > 3 4 18 > Please tell me how can I do it > Thank you very much > Evanescence 2007 03 19 f[x_, y_] := 2x + 3y; For[i = 0, i < 5, For[j = 0, j < 3, Print[i, " ", 2 j, " ", f[i, 2 j]]; j++]; i++] Olaf