2012-10-08 26 views
12

Pakiet R pozwala na wykreślenie interaktywnych figur 3D i zapisanie tych liczb w dokumencie HTML (z funkcją writeWebGL()).Osadzanie animowanej grafiki 3D R w programie PowerPoint

Chciałbym umieścić taką interaktywną figurkę 3D w prezentacji PowerPoint. Czy to możliwe ?

EDIT: Po przestudiowaniu odpowiedź Dieter Menne za pomocą Google, moje wnioski są następujące:

    metoda
  • obecnie Luke'a Tierney konwertować grafikę 3D do pliku U3D i/lub asymptote plik działa tylko w przypadku grafiki utworzonej przy użyciu pakietu misc3d, a nie pakietu rgl.
  • Eksport grafiki 3D rgl do plików VRML/X3D został ogłoszony jako plan na przyszłość. Być może pozwoliłoby to osadzić grafikę 3D rgl w prezentacji Powerpoint i/lub LaTeX.

EDIT: related discussion

+1

Masz przeglądarkę, a nawet R, działającą w tle i użyj Alt-Tab, aby przełączać się między – James

Odpowiedz

5

Jest to możliwe, jeśli przenieść prezentację PowerPoint (lub, jeszcze bardziej R-owski, stosowanie Beamer/lateks) i osadzić 3D-plot w sposób opisany w Luke Tierney artykuł

http://homepage.stat.uiowa.edu/~luke/R/misc3d/misc3d-pdf/misc3d-pdf.pdf

+0

Dziękuję.Oczywiście wolę renderowanie LaTeX, ale naprawdę muszę zrobić prezentację za pomocą programu PowerPoint. Co rozumiesz przez "przeniesienie prezentacji Powerpoint"? –

+0

Wyeksportuj prezentację PP jako pdf. –

+0

Jak? Z PDFcreator? –

4

Jeśli umieścisz w tym do dokumentu HTML, prawdopodobnie można użyć obiektu IWebBrowser2 otworzyć HTML wewnątrz prowadnicy. Nie jestem pewien, jak renderowałaby się grafika 3d, a ja nie jestem zaznajomiony z R lub nie byłbym w stanie zaoferować żadnej dodatkowej porady, ale możesz zacząć od próby po prostu utworzenia obiektu WebBrowser w swoim slajdzie, a następnie powiedzieć mu, aby Przejdź do pliku HTML.

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 

Kontrolowanie tego przepływu podczas pokazu slajdów może być nieco trudniejsze, ale jest to wykonalne, pod warunkiem, że graficzny wyświetla się poprawnie przez IE tak.

Jak zainstalować ten Macro

  1. Otwórz prezentację PowerPoint, a następnie kliknij Alt + F11, aby otworzyć projekt Visual Podstawowe.
  2. prawym przyciskiem myszy projekt w lewym okienku, a następnie włóż moduł:

enter image description here

  1. Wklej kod z moją odpowiedź do tego modułu.
  2. W wierszu, który mówi: wb.Navigate "C:\..." zmodyfikuj tę ścieżkę do poprawnej ścieżki pliku HTML. Może to być na komputerze lub w udostępnionym folderze sieciowym, itp.

Przeglądarka powinna być w stanie wyświetlać strony HTML w trybie Pokazu slajdów, ale nie będzie renderować ich w trybie normalnym ani w trybie podglądu.

+0

Dziękuję za Twój wkład. Nie przegłosowałem, ponieważ jestem nieświadomy html i wtedy nie rozumiem żadnego słowa :) –

+0

@ StéphaneLaurent to nie jest HTML per se, ale jest to makro, które może wstawić HTML do twojego slajdu PowerPoint. Zaktualizuję nieco szczegółów, jak dodać to makro do twojej Prezentacji, a następnie zobaczymy, czy to działa dla Ciebie. –

Powiązane problemy