Table von Funktionen

[Simon Stingelin <simon.stingelin@XXXXXXX.ch>]

Hallo zusammen,

ich hatte gerade ein Problem, das vielleicht auch andere schon hatten:

Man will einen Table von Funktionen automatisch erstellen:

S = Table[(If[#1 ≥ t0, If[# ≤ t0 + 2, 2, 0], 0] &), {t0, 0, 2, .5}]

Das geht jedoch nicht, da t0 nicht ersetzt wird. Nun wie weiter? Ich 
habe das Problem wie folgt gelöst:

S = Table[Evaluate[(If[#1 ≥ #2, If[# ≤ #2 + 2, 2, 0], 0] &)[#, t0]] &, 
{t0, 0, 2, .5}]

finde jedoch die Lösung etwas verzwickt. Hat jemand eine bessere Idee 
wie man mit Aufgaben dieser Art umgeht?

Mit freundlichen Grüssen

Simon Stingelin.

---
mail: simon.stingelin@XXXXXXX.ch
web: http://www.diax.ch/users/stingelin