mesh3d_mesh | R Documentation |
Mesh3d 3D Model
mesh3d_mesh(
mesh,
center = FALSE,
position = c(0, 0, 0),
scale = c(1, 1, 1),
angle = c(0, 0, 0),
pivot_point = c(0, 0, 0),
order_rotation = c(1, 2, 3),
materialspath = NULL,
material = material_list()
)
mesh |
Mesh3d object. |
center |
Default 'FALSE'. Whether to center the mesh. |
position |
Default 'c(0,0,0)'. Position of the mesh. |
scale |
Default 'c(1,1,1)'. Scale of the mesh. Can also be a single numeric value scaling all axes uniformly. |
angle |
Default 'c(0,0,0)'. Angle to rotate the mesh. |
pivot_point |
Default 'c(0,0,0)'. Point around which to rotate the mesh. |
order_rotation |
Default 'c(1,2,3)'. Order to rotate the axes. |
materialspath |
Default 'NULL'. Path to the MTL file, if different from the OBJ file. |
material |
Default 'NULL', read from the MTL file. If not 'NULL', this accepts the output from the 'material_list()' function to specify the material. |
List describing the mesh.
if(rayvertex:::run_documentation()) {
#Read in a mesh3d object and rasterize it
if(length(find.package("Rvcg", quiet=TRUE)) > 0) {
library(Rvcg)
data(humface)
mesh3d_mesh(humface,position = c(0,-0.3,0),scale = 1/70,
material=material_list(diffuse="dodgerblue4", type="phong", shininess=20,
ambient = "dodgerblue4", ambient_intensity=0.3)) |>
rasterize_scene(lookat = c(0,0.5,1), light_info = directional_light(c(1,0.5,1)))
}
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.