问题
The rgl
R package allows to plot interactive 3D figures and to save these figures in a html document (with the writeWebGL()
function).
I would like to put such an interactive 3D figure in a PowerPoint presentation. Is it possible ?
EDIT: After studying Dieter Menne's answer with the help of Google, my conclusions are the following ones:
- Currently Luke Tierney's method to convert a 3D graphic to an U3D file and/or an Asymptote file only works for graphics created with the
misc3d
package, not thergl
package. - The export of 3D rgl graphics to VRML/X3D files has been announced as a future plan. Perhaps this would allow to embed a 3D rgl graphic into a Powerpoint and/or LaTeX presentation.
EDIT : related discussion
回答1:
It is possible if you transfer the Powerpoint presentation (or, even more R-ish, use beamer/latex), and embed the 3D-plot as described in Luke Tierney's article
http://homepage.stat.uiowa.edu/~luke/R/misc3d/misc3d-pdf/misc3d-pdf.pdf
回答2:
If you put this in to an HTML document, you can probably use the IWebBrowser2
object to open the HTML inside a Slide. I am not sure how a 3d graphic would render, and I'mnot familiar with R or would not be able to offer any further advice, but you might start by trying to simply create a WebBrowser object inside your slide, and then tell it to Navigate to the HTML file.
Sub InsertHTMLFrame()
Dim sld as Slide
Dim shp as Shape
Dim wb as Object
Set sld = ActivePresentation.Slides(1) '## Modify as needed
'## Create the shape container, you will need to modify the L/T/W/H to fit your document
Set shp = sld.Shapes.AddOLEObject(100, 200, 200, 150, _
"Shell.Explorer.2")
shp.Name = "3dgraphic"
Set wb = shp.OLEFormat.Object
wb.Navigate "C:\Users\you\Desktop\exported3dgraphic.html"
End Sub
Controlling this flow during SlideShow mode may be a little trickier, but it's doable, provided the graphic renders properly through IE like this.
How to Install This Macro
- Open your PowerPoint Presentation, and click Alt+F11 to bring up the Visual Basic project.
- Right-click the project in the left pane, and Insert Module:
- Paste the code from my answer in to this module.
- In the line that says
wb.Navigate "C:\..."
modify this to the correct file path for your HTML file. This can be on your computer or in a shared network folder, etc.
The browser should be able to display HTML pages when in SlideShow mode, but will not render them in the normal or preview mode.
来源:https://stackoverflow.com/questions/12781129/embedding-a-r-animated-3d-plot-in-powerpoint