47


<%@ page language="java"  %>


<%@ taglib uri="/webMathematica taglib" prefix="msp" %>






Live 3D Plotting




 


 


 


 $ImageBackground = "#ffffff";


 $ImageSize = {300,300}; 


 


Live 3D Plotting




  Plot3D of  


  


     " MSPValue[ $$fun,  "Sin[x y]^2"] 


">


  


  x from:


  


    "MSPValue[ $$x0,  " 2"] ">


  to:


  


    "MSPValue[ $$x1,  "2"] ">


  


  y from:


  


    "MSPValue[ $$y0,  " 2"] ">


  to:


  


    "MSPValue[ $$y1,  "2"] ">


  


  Number of points to plot


  


    "MSPValue[ $$pts,  "20"] "> 


  


  


MSPBlock[ {$$fun, $$x0, $$x1, $$y0, $$y1, $$pts}, 


MSPLive3D[


Plot3D[$$fun, 


{x,$$x0,$$x1}, {y,$$y0,$$y1}, PlotPoints  > 


$$pts]]]


  


  


   




 






 .


<





New Page 1









Comcast Web Hosting