Axel, Thank you. Exporting to gif worked out OK (except cutting off the labels on the y-axis) - that's how I got the pictures, I didn't do any editing of them later. Saving took some time (a few minutes), but seemed OK, too. Perhaps, if I waited longer, the saved file could be opened. I tried to open it only once and waited only for about 3 minutes. Later I thought that I could just export all plots to gifs, remove output, and insert pictures from the exported gifs after that. That should make the worksheet considerably smaller. Alec

If you want to use eliminate in this situation, it can be done as

E3 := a1(t) = b1(t):
E4 := b1(t) = c1(t):
b:=convert(b1(t),name):
subs(b=b1(t),eliminate(subs(b1(t)=b,{E3, E4}), b));

                  [{b1(t) = a1(t)}, {a1(t) - c1(t)}]

That can be made into a procedure,

Eliminate:=proc(eqns,vars)
local v;
if type(vars,'set') then v:=map(convert,vars,name); 
subs(seq(v[i]=vars[i],i=1..nops(vars)),
eliminate(subs(seq(vars[i]=v[i],i=1..nops(vars)),eqns),v))
else v:=convert(vars,name); 
subs(v=vars,eliminate(subs(vars=v,eqns),v))
fi end:

In your example

Eliminate({E3,E4},b1(t));

                  [{b1(t) = a1(t)}, {a1(t) - c1(t)}]

Eliminate({E3,E4},{b1(t)});

                  [{b1(t) = a1(t)}, {a1(t) - c1(t)}]

If you want to use eliminate in this situation, it can be done as

E3 := a1(t) = b1(t):
E4 := b1(t) = c1(t):
b:=convert(b1(t),name):
subs(b=b1(t),eliminate(subs(b1(t)=b,{E3, E4}), b));

                  [{b1(t) = a1(t)}, {a1(t) - c1(t)}]

That can be made into a procedure,

Eliminate:=proc(eqns,vars)
local v;
if type(vars,'set') then v:=map(convert,vars,name); 
subs(seq(v[i]=vars[i],i=1..nops(vars)),
eliminate(subs(seq(vars[i]=v[i],i=1..nops(vars)),eqns),v))
else v:=convert(vars,name); 
subs(v=vars,eliminate(subs(vars=v,eqns),v))
fi end:

In your example

Eliminate({E3,E4},b1(t));

                  [{b1(t) = a1(t)}, {a1(t) - c1(t)}]

Eliminate({E3,E4},{b1(t)});

                  [{b1(t) = a1(t)}, {a1(t) - c1(t)}]

The following procedure does that,

BM:=proc(n::posint,m::posint)
local X,W,A,c;
uses Statistics,ListTools;
X:=RandomVariable(Normal(0,1/sqrt(n)));
W:='<0,PartialSums([seq(i,i=Sample(X,n))])[]>'$m;
A:=`+`(W)/m;
c:=[seq(evalhf(i/n),i=0..n)];
print(plots[display](LineChart([W],xcoords=c),
LineChart(A,xcoords=c,color=red,thickness=2),
symbolsize=1,axes=boxed))
end:

The first argument is the number of points in a path; the second argument is the number of paths. The average path is red. For example,

BM(1000,5);

BM(1000,100);

I did also BM(1000,1000), but numbers on the y-axis were partially cut off. By the way, the worksheet size grew up to 87 MB and I couldn't open it in a new Maple session.

BM(1000,1000);

______________ Alec Mihailovs http://mihailovs.com/Alec/

Many of these suggestions have been implemented. Frankly, I don't miss "Wiki". A refereed online journal would be a good addition. What I am missing the most and what have made this site so interesting from the very beginning, are Maplesoft people blogs. Paul DeMarco's Maple Baseball, Tom Lee's Functioning Maple V R1 DOS demo (circ. 1991), Jan Bakus's Image Processing with Maple blog entries, all about a year old, are still among the best entries on this site, as well as various Jacques Carette's comments, and Joe Riel's (and, maybe, some of mine) posts. I added something new to my blog, Matrix Algebra over Finite Fields, but that doesn't seem to make much a difference. More blog posts from Maplesoft people would make a difference - especially not technical posts, but some memories, history etc.

For me, a link to the file details page would be even more useful, because it contains the content of the worksheet that makes downloading the worksheet unnecessary in many cases (and I don't usually download worksheets.) Also, it is much better if the input is in the text form and not in 2d-math, so that it could be easily copied and pasted. __________ Alec Mihailovs http://mihailovs.com/Alec/

For me, a link to the file details page would be even more useful, because it contains the content of the worksheet that makes downloading the worksheet unnecessary in many cases (and I don't usually download worksheets.) Also, it is much better if the input is in the text form and not in 2d-math, so that it could be easily copied and pasted. __________ Alec Mihailovs http://mihailovs.com/Alec/

If you would like to share it, you could put it in your blog. I just looked there - it seems as if you didn't write anything in your blog yet. __________ Alec Mihailovs http://mihailovs.com/Alec/

If you would like to share it, you could put it in your blog. I just looked there - it seems as if you didn't write anything in your blog yet. __________ Alec Mihailovs http://mihailovs.com/Alec/

It is just an idea, but that also, probably, can be done by editing the .mw file in a text editor.

It is just an idea, but that also, probably, can be done by editing the .mw file in a text editor.

Tickmarks option can be also used for getting rid of numbers, but saving the tickmarks,

plot(x^2-1,x=-2..2,tickmarks=map2([seq],i="",[i=-2..2,i=-1..3],0.2));

Note, however, that Standard Maple adds 2 ticks to the y-axis, at the top and at the bottom (the plot is OK in Classic Maple). That feature can be considered as a bug.

Tickmarks option can be also used for getting rid of numbers, but saving the tickmarks,

plot(x^2-1,x=-2..2,tickmarks=map2([seq],i="",[i=-2..2,i=-1..3],0.2));

Note, however, that Standard Maple adds 2 ticks to the y-axis, at the top and at the bottom (the plot is OK in Classic Maple). That feature can be considered as a bug.

See also another example in Simple question about increasing the size of a Matrix thread.

See also another example in Simple question about increasing the size of a Matrix thread.