Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum: 'I NEED H-E-L-P WITH LISTS' topicStudent Support Forum > General > "I NEED H-E-L-P WITH LISTS"

Next Comment >Help | Reply To Topic
Author Comment/Response
Anne
07/01/00 06:01am

Can someone please tell me what I did wrong

-----

Dims = (Floor[Random[]*5+2])^2;

ColorList = {};
BlankDims = {0};
For[a = 1, a <= Dims, a++, BlankDims = Join[BlankDims, {0}]];

For[a=1, a <= Dims, a++,
IF[a == 1, DoNothingB = {Floor[Random[] + 0.5]},
DoNothingB = Join[{Floor[Random[]+0.5]},DoNothingB]]];
For[a=1, a <= Dims,a++,
If[DoNothingB[[a]]=1, Join[ColorList, {0}],
Join[ColorList, {(Random[]*a/Dims)+a/Dims}]]];
For[a=1, a<= Dims, a++,
If[a == 1, CommandList = {Floor[Random[]*8]},
CommandList = Join[CommandList,{Floor[Random[]*8]}]]]

Set::''partw'': ''Part \!\(3\) of \!\({1, 1}\) does not exist.''
Set::''partw'': ''Part \!\(4\) of \!\({1, 1}\) does not exist.''
Set::''partw'': ''Part \!\(5\) of \!\({1, 1}\) does not exist.''

^--- Talking about DoNothingB

I am starting part of a program, a fractal generator, and I am trying to get a few lists of random values together but no matter how I try to add values to the list I keep getting errors. PLEASE HELP

URL: ,

Subject (listing for 'I NEED H-E-L-P WITH LISTS')
Author Date Posted
I NEED H-E-L-P WITH LISTS Anne 07/01/00 06:01am
Re: I NEED H-E-L-P WITH LISTS Forum Modera... 07/01/00 06:16am
Next Comment >Help | Reply To Topic