Arothron (version 2.0.5)

noise.mesh: noise.mesh

Description

This function adds noise to a mesh

Usage

noise.mesh(mesh, noise = 0.025, seed = 123)

Value

mesh_n a 3D model of class "mesh3d" with noise

Arguments

mesh

triangular mesh stored as object of class "mesh3d"

noise

sd deviation to define vertex noise

seed

seed for random number generator

Author

Antonio Profico, Costantino Buzi, Marina Melchionna, Paolo Piras, Pasquale Raia, Alessio Veneziano

Examples

#load mesh
library(compositions)
library(rgl)
data("SCP1.mesh")
mesh<-SCP1.mesh
#add noise
noised<-noise.mesh(mesh,noise=0.05)
#plot original and mesh with noise added
open3d()
shade3d(mesh,col=3)
shade3d(noised,col=2,add=TRUE)