Question: plotting graphs

December 03 2012 jam 0
Maple 16
0

Hey all :)

restart; 
W:=(x,t)->(8*R/Pi^2*sum((1/(2*n-1))^2)*sin((2*n-1)*pi/2)*sin((2*n-1)*pi*x/2*L)*(cos(c*(2*n-1)*pi*t/2*L)),n=1..infinity);

L:=0.25;

T:=2500;

rho:=0.01;

R:=0.005;

c:=sqrt(T/rho);
evalf(W); (this just comes up with W)

I have tried plotting this graph below but unsuccessful! Help needed!!

plot([seq(W,t=[seq(0..0.001,0.0001)])],x=0..2*L);
Please Wait...