Generates a large sphere that can be used as the ground for a scene.
generate_ground( depth = -1, spheresize = 1000, material = diffuse(color = "#ccff00") )
depth | Default `-1`. Depth of the surface. |
---|---|
spheresize | Default `1000`. Radius of the sphere representing the surface. |
material | Default |
color | Default `#ccff00`. The color of the sphere. Can be either a hexadecimal code, or a numeric rgb vector listing three intensities between `0` and `1`. |
Single row of a tibble describing the ground.
#Generate the ground and add some objects scene = generate_ground(depth=-0.5, material = diffuse(noise=1,noisecolor="blue",noisephase=10)) %>% add_object(cube(x=0.7,material=diffuse(color="red"),angle=c(0,-15,0))) %>% add_object(sphere(x=-0.7,radius=0.5,material=dielectric(color="white"))) # \donttest{ render_scene(scene, parallel=TRUE,lookfrom=c(0,2,10))# } # Make the sphere representing the ground larger and make it a checkered surface. scene = generate_ground(depth=-0.5, spheresize=10000, material = diffuse(checkercolor="grey50")) %>% add_object(cube(x=0.7,material=diffuse(color="red"),angle=c(0,-15,0))) %>% add_object(sphere(x=-0.7,radius=0.5,material=dielectric(color="white"))) # \donttest{ render_scene(scene, parallel=TRUE,lookfrom=c(0,1,10))# }