RE: [Newbie questions] function composition
- To: mathgroup at smc.vnet.net
- Subject: [mg38094] RE: [mg38050] [Newbie questions] function composition
- From: "David Park" <djmp at earthlink.net>
- Date: Tue, 3 Dec 2002 04:30:19 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Francois, If c = d = 1, then b = 1 also. So just add the definition... f[f[a_, 1, 1], 1, e_] := f[f[a, b, 1/2], b, 1/2] For your list problem, use Combinatorica. Needs["DiscreteMath`Combinatorica`"] ?KSubsets KSubsets[l, k] gives all subsets of set l containing exactly k elements, \ ordered lexicographically. KSubsets[{a, b, c}, 2] Thread[# -> {0, 0}] & /@ % gives {{a,b},{a,c},{b,c}} {{a -> 0, b -> 0}, {a -> 0, c -> 0}, {b -> 0, c -> 0}} The last statement works this way... {a,b} -> {0,0} Thread[%] {a, b} -> {0, 0} {a -> 0, b -> 0} We then just map that function onto each of the three sets. David Park djmp at earthlink.net http://home.earthlink.net/~djmp/ From: Francois Bernard Lauze [mailto:francois at itu.dk] To: mathgroup at smc.vnet.net Hi, Hope I won't be too imprecise, I just started with mathematica last Friday. 1) I want to define a function, say f, with among others the following property f[f[a,b,c],d,e] should be evaluated as f[f[a,b,1/2],b,1/2] in case b = d and c = d = 1 2) from a list, say {a,b,c}, I would like to generate {{b->0,c->0},{a->0,c->0},{a->0,b->0} I guess I have understood the iterative way of doing that, but what about a more functionqal form? Thanks a lot, Francois -- Francois Lauze The IT University of Copenhagen, Glentevej 67 2400 Kbh NV, Denmark Tel (45) 38 16 89 29