Sphere 3D Model
Default c(0,0,0). Position of the mesh.
Default c(1,1,1). Scale of the mesh. Can also be a single numeric value scaling all axes uniformly.
Default c(0,0,0). Angle to rotate the mesh.
Default c(0,0,0). Point around which to rotate the mesh.
Default c(1,2,3). Order to rotate the axes.
Default 1. Radius of the sphere.
Default FALSE. If TRUE, will use a low-poly sphere.
Default TRUE. Whether to include vertex normals.
Default material_list() (default values). Specify the material of the object.
List describing the mesh.
if(run_documentation()) {
#Generate a sphere in the Cornell box.
generate_cornell_mesh() |>
add_shape(sphere_mesh(position = c(555/2, 555/2, 555/2), radius = 100)) |>
rasterize_scene(light_info = directional_light(c(0,0.5,-1)))
}
#> Setting default values for Cornell box: lookfrom `c(278,278,-800)` lookat `c(278,278,0)` fov `40` .
if(run_documentation()) {
#Generate a shiny sphere in the Cornell box
generate_cornell_mesh() |>
add_shape(sphere_mesh(position = c(555/2, 100, 555/2), radius = 100,
material = material_list(diffuse = "gold",type="phong"))) |>
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` .
if(run_documentation()) {
#Generate an ellipsoid in the Cornell box
generate_cornell_mesh() |>
add_shape(sphere_mesh(position = c(555/2, 210, 555/2), radius = 100,
angle=c(0,30,0), scale = c(0.5,2,0.5),
material = material_list(diffuse = "dodgerblue",type="phong"))) |>
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` .