Create a Set of Lines with Tetrahetra Centered at Points along the Lines
Creates a scene consisting of lines made up of small tetrahedra centered at points along them.
linesTetrahedra(x, y, z, delta=c(min(x[,2]-x[,1])/10,
min(y[,2]-y[,1])/10,
min(z[,2]-z[,1])/10),
lwd = 0.01, color = "black", ...)x, y, z |
numeric vectors of length two or matrices with two columns representing coordinates of starting and ending points of line(s). |
delta |
numeric; increase in each dimension used to locate points along the lines; recycled to length 3. |
lwd |
numeric; used for the size of the tetrahedron in each dimension; recycled to length 3. |
color |
color to use for the tetrahedra. |
... |
additional arguments to be passed on to
|
The function uses the Bresenham's line algorithm to locate points along lines and then creates a triangle mesh scene representing tetrahedra centered at those points.
Returns a triangle mesh scene representing the lines.
p <- pointsTetrahedra(x=c(100,100, 257, 257),
y=c(100,100, 257, 257),
z=c(100,257, 257, 100), size=1)
l <- linesTetrahedra(x=matrix(c(100,257,
100,257), nrow=2, byrow=TRUE),
y=matrix(c(100,257,
100,257), nrow=2, byrow=TRUE),
z=matrix(c(100,257,
257,100), nrow=2, byrow=TRUE),
lwd=0.4,
col="red")
drawScene.rgl(list(p, l))Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.