Function of list of functions
- To: mathgroup at smc.vnet.net
- Subject: [mg104022] Function of list of functions
- From: Andrey <oradev at rambler.ru>
- Date: Fri, 16 Oct 2009 07:17:55 -0400 (EDT)
Hello!
May be anybody can help me. So, I have this:
L = {{1, 2, 3}, {1, 2, 3}, {1, 2, 3}};
Fun1[t_] := ListPlot[L[[1, t]]];
Fun2[t_] := ListPlot[L[[2, t]]];
Fun3[t_] := ListPlot[L[[3, t]]];
FunRes[t_] := {Fun1[t], Fun2[t], Fun3[t]};
Everything is ok, BUT if I want to add element to list of FunRes[t_]
in loop, I have an error? so I mean this:
FunRes[t_] := {};
For[i = 1, i <= 3, i++,
{Subscript[Fun, i][t_] := ListPlot[L[[i, t]]],
AppendTo[FunRes[t], Subscript[Fun, i][t]]}]
Please, help me, where I am wrong?