MathGroup Archive 2007

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

Search the Archive

Re: About function to evaluation

  • To: mathgroup at smc.vnet.net
  • Subject: [mg74519] Re: About function to evaluation
  • From: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
  • Date: Fri, 23 Mar 2007 19:18:40 -0500 (EST)
  • Organization: The Open University, Milton Keynes, UK
  • References: <ett7mp$ifv$1@smc.vnet.net>

Evanescence wrote:
> Hello Dear all:
> My questions are as follows:
> First I definite a function is f[x_,y_]:=2x+3y
> Then I have a list is data={{1,2,0},{2,3,0},{4,1,0},{6,3,0},{1,3,0}}
> For example{y,x,z}={1,2,0}    {y,x,z}={2,3,0}  {y,x,z}={4,1,0}
> {y,x,z}={6,3,0} {y,x,z}={1,3,0}
> I want to take the list data to the function to get the function
> values.
> Then express the form as follows at last
> 
>    x     y     f[x,y]
>    2     1       7
>    3     2      12
>    1     4      14
>    3     6      24
>    3     1       9
> 
> PS: The z values is zero overall.
> Please tell me how to get the function values in the list
> Thank you very much
> Evanescence 2007 03 21
> 
> 
One way of doing what you want is the following:

In[1]:=
f[{x_Integer, y_Integer, _}] := 2*x + 3*y;

data = {{1, 2, 0}, {2, 3, 0}, {4, 1, 0}, {6, 3, 0}, {1, 3, 0}};

data[[All,3]] = f /@ data[[All,{2, 1, 3}]];

TableForm[data[[All,{2, 1, 3}]],
   TableHeadings -> {None, {"x", "y", "f[z,y]"}},
   TableAlignments -> Right]

Out[5]//TableForm=

    x   y   f[z,y]

    2   1       7

    3   2      12

    1   4      14

    3   6      24

    3   1       9

Regards,
Jean-Marc


  • Prev by Date: Re: About function to evaluation
  • Next by Date: what the beep? - a very strange bug
  • Previous by thread: Re: About function to evaluation
  • Next by thread: special projects ad