I was digging through my old worksheets and came across something I created for one of my projects I never finished or well am still intending to work on.  Anyways I had come across a plot created in Matlab and noticed Maple didn't have an option to create gridlines in the axis on a 3d plot like Matlab did (at least I think it was Matlab) in any case I tried to mimic the same thing in Maple as exactly as I could.  The below is the groundwork I came up with and I also had unfinished code in the worksheet converting it to a procedure (won't be to hard to put into a proc) but the general idea is as I created below.  Hopefully we can all enjoy the usefullness of the idea.

restart;gc():
ax:=seq([0,i],[10,i]],i=0..10):
ay:=seq([[i,0],[i,10]],i=0..10):
g:=PLOT(CURVES(ay,ax))

with(plottools):
to3d:=transform((x,y)->[x,y,0]):
g1:=to3d(g)

to3d2:=transform((x,y)->[x,0,y]):
to3d3:=transform((x,y)->[0,x,y]):
g2:=to3d2(g):
g3:=to3d3(g):
with(plots):
display(g1,g2,g3,linestyle=dash,color=COLOR(RGB,.87,.87,.87),axes=box)

 


Please Wait...