# NOT RUN {
#Plot the dragon
plot_image(dragon)
#Plot the depth map
image(dragondepth, asp = 1, col = grDevices::heat.colors(256))
#Preview the focal plane:
# }
# NOT RUN {
render_bokeh(dragon, dragondepth, focus=950, preview_focus = TRUE)
# }
# NOT RUN {
#Change the focal length:
# }
# NOT RUN {
render_bokeh(dragon, dragondepth, focus=950, focallength=300)
# }
# NOT RUN {
#Change the focal distance:
# }
# NOT RUN {
render_bokeh(dragon, dragondepth, focus=600, focallength=300)
render_bokeh(dragon, dragondepth, focus=1300, focallength=300)
# }
# NOT RUN {
#Change the bokeh shape to a hexagon:
# }
# NOT RUN {
render_bokeh(dragon, dragondepth, bokehshape = "hex",
focallength=300, focus=600)
# }
# NOT RUN {
#Change the bokeh intensity:
# }
# NOT RUN {
render_bokeh(dragon, dragondepth,
focallength=400, focus=900, bokehintensity = 1)
render_bokeh(dragon, dragondepth,
focallength=400, focus=900, bokehintensity = 3)
# }
# NOT RUN {
#Rotate the hexagonal shape:
# }
# NOT RUN {
render_bokeh(dragon, dragondepth, bokehshape = "hex", rotation=15,
focallength=300, focus=600)
# }
Run the code above in your browser using DataLab