search for: quads3d

...puede ver, ejecutando: ang <- pi/180 cont <- 1 while(cont < 360) { # Vertices del cuadrado original if(cont == 1) { v <- matrix(NA,4,3) v[,1] <- c(0,0,1,1) v[,2] <- c(0,0,0,0) v[,3] <- c(0,1,1,0) # Cuadrado Original quads3d(v[,1],v[,2],v[,3],col="green") } # Rotacion v[1,] <- rotate3d(v[1,], ang, 0, 1, 0) v[2,] <- rotate3d(v[2,], ang, 0, 1, 0) v[3,] <- rotate3d(v[3,], ang, 0, 1, 0) v[4,] <- rotate3d(v[4,], ang, 0, 1, 0) # Pausa Sys.sleep(0.3) # Limpiar...

I'd like to use rgl.surface (or some other function if more appropriate) to create a horizontal and vertical transparent grey slice (plane) running through both the x and y origins and extending across the z axis, i.e. the 3-d equivalent of the normal 2-d coordinate axes we are all familiar with. The examples for rgl.surface are a bit more complex than what I need and I am having trouble

...coord.4=c(0,0,0) coord.5=c(50,50,70) pyrcolor="red" triangles3d(rbind(coord.1,coord.4,coord.5),color=pyrcolor) triangles3d(rbind(coord.1,coord.2,coord.5),color=pyrcolor) triangles3d(rbind(coord.2,coord.3,coord.5),color=pyrcolor) triangles3d(rbind(coord.3,coord.4,coord.5),color=pyrcolor) quads3d(rbind(coord.1,coord.2,coord.3,coord.4),color=pyrcolor) vertices = LETTERS[1:5] text3d(coord.1,text=vertices[1],adj=1,color="blue") text3d(coord.2,text=vertices[2],adj=0,color="blue") text3d(coord.3,text=vertices[3],adj=0,color="blue") text3d(coord.4,text=vertices[4],a...

Dearl list, can anyone point me to a function or library that can create a graph similar to the one in the following powerpoint presentation? http://bmi.osu.edu/~khuang/IBGP705/BMI705-Lecture7.ppt (pages 36-37) In order to try to explain the graph, the way I see it in R terms is something like this: the "p-q" axis is a vector of positions (for example, seq(0,5000000,1)) the

...>> The error most likely occurred in: >> >>> ### * 3dobjects >>> >>> flush(stderr()); flush(stdout()) >>> >>> ### Name: points3d >>> ### Title: add primitive set shape >>> ### Aliases: points3d lines3d segments3d triangles3d quads3d >>> ### Keywords: dynamic >>> >>> ### ** Examples >>> >>> # Show 12 random vertices in various ways. >>> >>> M <- matrix(rnorm(36), 3, 12, dimnames=list(c('x','y','z'), >> +...

For use with rgl, I'm looking for a function to draw a plane in an rgl scene that would function sort of like abline(a, b) does in base graphics, where abline(0, 1) draws a line of unit slope through the origin. Analogously, I'd like to have a plane3d function, so that plane3d(0, 1, 1) draws a plane through the origin with unit slopes in x & y and plane3d(3, 0, 0) draws a

For a paper dealing with generalized ellipsoids, I want to illustrate in 3D an ellipsoid that is unbounded in one dimension, having the shape of an infinite cylinder along, say, z, but whose cross-section in (x,y) is an ellipse, say, given by the 2x2 matrix cov(x,y). I've looked at rgl:::cylinder3d, but don't see any way to make it accomplish this. Does anyone have any ideas? thx,

Hello, I want to draw 3D cylinder objects in R. Given is the length and the diameter of the cylinder. Has anybody an example? Thank you very much! Best regards -- ---------------------- Dr. Hans-Joachim Klemmt Forstoberrat Organisationsprogrammierer IHK Bayerische Landesanstalt f?r Wald und Forstwirtschaft zugewiesen an Lehrstuhl f?r Waldwachstumskunde Technische Universit?t M?nchen

Hi all, I am considering writing a 3D visualisation package for R. Purposes: - Visualise 3 dimension data - Manipulate the data or series or any other object with the mouse as in any 3D software (3D Studio Max, Lightwave...) - Eventually display more than just 3D objects. Justification: - It's always interesting to plot data before performing any analysis - Manipulating (rotating,

...s a horizontal plane > at z=3. > > I see that scatterplot3d in the scatterplot3d package returns a > plane3d() *function* for a given > plot. I could probably try to adapt this, but before I do, I wonder > if something like this for > rgl exists that I haven't found. ?quads3d > > -Michael David Winsemius, MD West Hartford, CT ------------------------------ Message: 82 Date: Tue, 4 May 2010 14:20:59 -0600 From: Greg Snow <Greg.Snow at imail.org> To: Richard and Barbara Males <rbmales at gmail.com> Cc: "r-help at r-project.org" <r-he...