longitudinalData (version 2.4.7)

saveTrianglesAsASY: ~ Function: saveTrianglesAsASY ~

Description

Export a Triangle object to an '.asy' file.

Usage

saveTrianglesAsASY(scene, filename = "scene.asy")

Value

An '.asy' file, in the current directory.

Arguments

scene

[Triangle]: Object representing the graph to plot, probably produce by plot3dPdf.

filename

[character]: Name of exported file.

Author(s)

Luke Tierney
Chair, Statistics and Actuarial Science
Ralph E. Wareham Professor of Mathematical Sciences
University of Iowa

Details

Export a Triangle object to an '.asy' file. See plot3dPdf for a summary of the overall procedure.

References

https://homepage.divms.uiowa.edu/~luke/R/misc3d/misc3d-pdf/misc3d-pdf.pdf

See Also

plot3dPdf,makeLatexFile,makeTriangles

Examples

  ### Move to tempdir
  wd <- getwd()
  setwd(tempdir()); getwd()
  
  ### Generating the data
  data(artificialJointLongData)
  myLd <- longData3d(artificialJointLongData,timeInData=list(var1=2:12,var2=13:23))
  part <- partition(rep(1:3,each=50))
  plotTrajMeans3d(myLd,part)

  ### Creation of the scene
  scene <- plot3dPdf(myLd,part)
  drawScene.rgl(scene)

  ### Export in '.asy' file
  saveTrianglesAsASY(scene)

  ### Creation of a '.prc' file
  # Open a console, then run:
  # 'asy -inlineimage -tex pdflatex scene.asy'

  ### Creation of the LaTeX main document
  makeLatexFile()

  ### Creation of the '.pdf'
  # Open a console window, then run
  # pdfLatex main.tex
  
  ### Go back to current dir
  setwd(wd)