3D obj model of the letter R

cube_mesh(
  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),
  material = material_list()
)

Arguments

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.

material

Default `material_list()` (default values). Specify the material of the object.

Value

List describing the mesh.

Examples

# \dontshow{ options("cores"=1) # } #Generate a cube # \donttest{ generate_cornell_mesh() %>% add_shape(cube_mesh(position = c(555/2, 100, 555/2), scale = 100)) %>% rasterize_scene(light_info = directional_light(c(0.5,0.5,-1)))
#> Setting default values for Cornell box: lookfrom `c(278,278,-800)` lookat `c(278,278,0)` fov `40` .
# } #Generate a blue rotated cube # \donttest{ generate_cornell_mesh() %>% add_shape(cube_mesh(position = c(555/2, 100, 555/2), scale = 100, angle=c(0,45,0), material = material_list(diffuse="dodgerblue"))) %>% rasterize_scene(light_info = directional_light(c(0.5,0.5,-1)))
#> Setting default values for Cornell box: lookfrom `c(278,278,-800)` lookat `c(278,278,0)` fov `40` .
# } #Generate a scaled, blue rotated cube # \donttest{ generate_cornell_mesh() %>% add_shape(cube_mesh(position = c(555/2, 100, 555/2), angle=c(0,45,0), scale = c(2,0.5,0.8)*100, material = material_list(diffuse="dodgerblue"))) %>% rasterize_scene(light_info = directional_light(c(0.5,0.5,-1)))
#> Setting default values for Cornell box: lookfrom `c(278,278,-800)` lookat `c(278,278,0)` fov `40` .
# }