Generate Cornell Box
generate_cornell(
light = TRUE,
lightintensity = 5,
lightcolor = "white",
lightwidth = 332,
lightdepth = 343,
sigma = 0,
leftcolor = "#1f7326",
rightcolor = "#a60d0d",
roomcolor = "#bababa",
importance_sample = TRUE
)
Default `TRUE`. Whether to include a light on the ceiling of the box.
Default `5`. The intensity of the light.
Default `white`. The color the of the light.
Default `332`. Width (z) of the light.
Default `343`. Depth (x) of the light.
Default `0`. Oren-Nayar microfacet angle.
Default `#1f7326` (green).
Default `#a60d0d` (red).
Default `#bababa` (light grey).
Default `TRUE`. Importance sample the light in the room.
Tibble containing the scene description of the Cornell box.
#Generate and render the default Cornell box.
if(run_documentation()) {
render_scene(generate_cornell(),
samples=128,aperture=0, fov=40, ambient_light=FALSE, parallel=TRUE)
}
#> Setting default values for Cornell box: lookfrom `c(278,278,-800)` lookat `c(278,278,555/2)` .
if(run_documentation()) {
#Make a much smaller light in the center of the room.
render_scene(generate_cornell(lightwidth=200,lightdepth=200),
samples=128,aperture=0, fov=40, ambient_light=FALSE, parallel=TRUE)
}
#> Setting default values for Cornell box: lookfrom `c(278,278,-800)` lookat `c(278,278,555/2)` .
if(run_documentation()) {
#Place a sphere in the middle of the box.
scene = generate_cornell(lightwidth=200,lightdepth=200) %>%
add_object(sphere(x=555/2,y=555/2,z=555/2,radius=555/4))
render_scene(scene, samples=128,aperture=0, fov=40, ambient_light=FALSE, parallel=TRUE)
}
#> Setting default values for Cornell box: lookfrom `c(278,278,-800)` lookat `c(278,278,555/2)` .
if(run_documentation()) {
#Reduce "fireflies" by setting a clamp_value in render_scene()
render_scene(scene, samples=128,aperture=0, fov=40, ambient_light=FALSE,
parallel=TRUE,clamp_value=3)
}
#> Setting default values for Cornell box: lookfrom `c(278,278,-800)` lookat `c(278,278,555/2)` .
if(run_documentation()) {
# Change the color scheme of the cornell box
generate_cornell(leftcolor="purple", rightcolor="yellow") |>
render_scene(samples=128,aperture=0, fov=40, ambient_light=FALSE,
parallel=TRUE,clamp_value=3)
}
#> Setting default values for Cornell box: lookfrom `c(278,278,-800)` lookat `c(278,278,555/2)` .