R语言rayrender包，r_objR 3 d文件渲染
2021-08-27 本文已影响0人
youmigo
R语言rayrender包，r_objR 3 d模型
# Sat Jul 17 00:50:27 2021 -
# 字符编码：UTF-8
# R 版本：R 4.1 x64 for window 11
# cgh163email@163.com
# 个人笔记不负责任，拎了个梨🍐🍈
#.rs.restartR()
require(rayrender)
rm(list = ls());gc()
? r_obj # R 3 d模型
# 加载并渲染包含的示例R对象文件。
generate_ground(material = diffuse(noise = TRUE, noisecolor = "grey20")) %>%
add_object(sphere(x = 2, y = 3, z = 2, radius = 1,
material = light(intensity = 10))) %>%
add_object(obj_model(r_obj(), y = -1, material = diffuse(color="red"))) %>%
render_scene(parallel=TRUE, lookfrom = c(0, 1, 10), clamp_value = 5, samples = 200)
image.png
