Changeset 7733:90f94138caf3

Timestamp:

12/12/07 10:34:36 (5 years ago)

Author:

William Stein <wstein@…>

Branch:

default

Message:

Trac #1480 -- embedded mathematica graphics in sage notebook.

Location:

sage

Files:

• interfaces/mathematica.py (modified) (3 diffs)
• misc/functional.py (modified) (3 diffs)

sage/interfaces/mathematica.py

@@ -226 +226 @@
                     FunctionElement, AsciiArtString)
 
-from sage.misc.misc import verbose
+from sage.misc.misc import verbose, graphics_filename
 
 def clean_output(s):
@@ -390 +390 @@
         return "}"
 
+    ###########################################
+    # System -- change directory, etc
+    ###########################################
+    def chdir(self, dir):
+        """
+        Change Mathematica's current working directory.
+        
+        EXAMPLES:
+        """
+        self.eval('SetDirectory["%s"]'%dir)
+
     def _true_symbol(self):
         return '         True'
@@ -454 +465 @@
         P = self._check_valid()
         return P.get(self._name, ascii_art=True)
+
+    def show(self, filename=None, ImageSize=600):
+        """
+        Show a mathematica plot in the Sage notebook.
+
+        EXAMPLES:
+            sage: P = mathematica('Plot[Sin[x],{x,-2Pi,4Pi}]')
+            sage: show(P)
+            sage: P.show(ImageSize=800)        
+        """
+        P = self._check_valid()
+        if filename is None:
+            filename = graphics_filename()
+        orig_dir = P.eval('Directory[]').strip()
+        P.chdir(os.path.abspath("."))
+        s = 'Export["%s", %s, ImageSize->%s]'%(filename, self.name(), ImageSize)
+        P.eval(s)
+        P.chdir(orig_dir)
 
     def str(self):

sage/misc/functional.py

@@ -29 +29 @@
 import sage.server.support
 import sage.interfaces.expect
+import sage.interfaces.mathematica
 
 
@@ -875 +876 @@
     OPTIONAL INPUT:
         filename -- (default: None) string
+
+    SOME OF THESE MAY APPLY:
         dpi -- dots per inch
         figsize -- [width, height] (same for square aspect)
@@ -886 +889 @@
         except AttributeError:
             pass
+    if isinstance(x, sage.interfaces.mathematica.MathematicaElement):
+        return x.show(*args, **kwds)
+        
     _do_show(x)