my.peri.tri: 3D object surface triangles

Description Usage Arguments Examples

Description

These function returns surface trinangles of 3D object

Usage

1
my.peri.tri(v, h = max(v), smooth = 0)

Arguments

v

is a 3d-array..

h

is a real value to draw contour line.

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
library(misc3d)
k <- 4
out <- my.3d.obj(3,k)
obj <- out$xyz[which(out$xyz.val==1),]
library(rgl)
plot3d(obj)

xyz.arr <- array(out$xyz.val,c(2^k,2^k,2^k))
tris <- my.peri.tri(xyz.arr)
drawScene.rgl(tris)

ryamada22/Ronlyryamada documentation built on May 28, 2019, 10:43 a.m.