| Author |
Comment/Response |
Patrick
|
01/23/13 6:39pm
Hi,
I am trying to use Table to iteratively write a set numbers to be passed into a function that uses them to solve a set of differential equations.
For example:
pm=Table[{i,j}, {j,0,1,0.1},{i,0,1,0.1}]
funcParams=Partition[Flatten[pm],2]]
For just two params, I am okay. But my parameter set has atleast 10 different parameters, and memory and time become a problem if I try the same approach.
I've also tried...
loops = Reap[
Table[
Sow[
{a, b, c, d, e, f, g, h, i, j, k, l, m, n}],
{n, 0, 1.}, {m, 0, 1.},
{l, 0, 1.}, {k, 0, 1.}, {j, 0, 1.},
{i, 0, 1.}, {h, 0, 1.}, {g, 0, 1.},
{f, 0, 1.}, {e, 0, 1.}, {d, 0, 1.},
{c, 0, 1.}, {b, 0, 1.}, {a, 0, 1.}
]
];
But I am not able to obtain the precision that I am seeking.
Does anyone know of a better (more efficient) way to do this?
Thank You,
Patrick
URL: , |
|