Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum > General > > "param sets"

Post Reply:
Name:
Email Address:

Please send email when my message is replied to.

Url (optional):
Subject:
Message: view original message?
Attachment (optional):
Please answer this:2+3 =



Original Message (ID '277555') By yehuda:
First, you have a problem with the Flattening. You fully flatten and then partition. If you call n nested loops (using table) you need to flatten out only n-1 levels and skip the Partition[ ] part. Second, there are other ways to WRITE more efficiently I notice that all the parameters range between 0 to 1 in steps of 0.1 For this cans it is easy writing with Array myParameters[n_Integer] := Flatten[Array[{##}*0.1 &, ConstantArray[11, n], ConstantArray[0, n]], n - 1] for n=6 (that is a,b,c,d,e,f) it takes only 0.7 sec to generate. another way is to use Tuples which is ~50 times faster myParametersTup[n_Integer] := Tuples[Range[0, 1, 0.1], n] With Outer you get similar results myParametersOut[n_Integer] := Flatten[Outer[List, Sequence @@ Table[Range[0, 1, 0.1], {n}]], n - 1] hope this works for you