Re: function...

• To: mathgroup at smc.vnet.net
• Subject: [mg123170] Re: function...
• From: DrMajorBob <btreat1 at austin.rr.com>
• Date: Fri, 25 Nov 2011 04:55:57 -0500 (EST)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• References: <201111241153.GAA28865@smc.vnet.net>

```Here's a function that fits:

Clear[f]
MapIndexed[(f[#2[[1]]] = #1) &, {{0, 2, 4, 5}, {0, 3}, {0, 2, 3}, {0, 1, 3,
4}, {0, 2, 3, 5, 8}, {1, 3, 5}, "anything at all"}];
?f

Global`f

f[1]={0,2,4,5}

f[2]={0,3}

f[3]={0,2,3}

f[4]={0,1,3,4}

f[5]={0,2,3,5,8}

f[6]={1,3,5}

f[7]=anything at all

Bobby

On Thu, 24 Nov 2011 05:53:39 -0600, Meriens <meriens at gmail.com> wrote:

> Hi to everyone,
> I want to know if there is a method in Mathematica to find a function
> with
> these caracteristics:
> y(y1,y2,y3,y4,y5,y6) with
> y1={0,2,4,5};
> y2={0,3};
> y3={0,2,3};
> y4={0,1,3,4};
> y5={0,2,3,5,8};
> y6={1,3,5}.
> Thank you for all suggestions.
>
> MERIEL F.

--
DrMajorBob at yahoo.com

```

• References:
• Prev by Date: Re: Aligning 2 Sets of Axes at {0,0}; Rotated & Standard Position
• Next by Date: Color - Appearance of Buttons