Hello I was wondering if anyone has been able to change the pch value for points in 3dplot()? I am able to change point colors just not symbol types. I have included a portion of my code below. I realize this won't work outside of my script, but thought, maybe there is something obvious that I am doing wrong. Also is it possible to utilize the interactive feature of 3dplot in a powerpoint, perhaps there is some sort of file format that the graph could be exported to? Any suggestions would be very much appreciated. Thanks in advance, library(rgl, pos=4) plot3d(subset(Dataset$PC1, source=="ashe_amphib"), subset(Dataset$PC2, source=="ashe_amphib"), subset(Dataset$PC3, source=="ashe_amphib"), xlim=c(-5,7), ylim=c(-5,3), zlim=c(-4,7), xlab="PC1", ylab="PC2", zlab="PC3", col=1, pch=1) points3d(subset(Dataset$PC1, source=="ashe_ZAS"), subset(Dataset$PC2, source=="ashe_ZAS"), subset(Dataset$PC3, source=="ashe_ZAS"), col=2, pch=2) points3d(subset(Dataset$PC1, source=="earlies_gap"), subset(Dataset$PC2, source=="earlies_gap"), subset(Dataset$PC3, source=="earlies_gap"), col=3, pch=3) -jh [[alternative HTML version deleted]]
On Jul 29, 2011, at 4:02 PM, jack hietpas wrote:> Hello I was wondering if anyone has been able to change the pch > value for > points in 3dplot()? I am able to change point colors just not > symbol types. > I have included a portion of my code below. I realize this won't work > outside of my script, but thought, maybe there is something obvious > that I > am doing wrong. Also is it possible to utilize the interactive > feature of > 3dplot in a powerpoint, perhaps there is some sort of file format > that the > graph could be exported to? Any suggestions would be very much > appreciated. > Thanks in advance, >My understanding is pretty hazy in the rgl domain but I seem to remember one of its authors stating that points in rgl do nor have pch- capacity (other than being small spheres). Ah, there it is: http://finzi.psych.upenn.edu/Rhelp10/2010-April/234284.html In addition to the text option mentioned, there are shapes and presumably one could make them small: http://finzi.psych.upenn.edu/R/library/rgl/html/mesh3d.html> > library(rgl, pos=4) > plot3d(subset(Dataset$PC1, source=="ashe_amphib"), subset(Dataset$PC2, > source=="ashe_amphib"), subset(Dataset$PC3, source=="ashe_amphib"), > xlim=c(-5,7), ylim=c(-5,3), zlim=c(-4,7), xlab="PC1", ylab="PC2", > zlab="PC3", col=1, pch=1) > points3d(subset(Dataset$PC1, source=="ashe_ZAS"), subset(Dataset$PC2, > source=="ashe_ZAS"), subset(Dataset$PC3, source=="ashe_ZAS"), col=2, > pch=2) > points3d(subset(Dataset$PC1, source=="earlies_gap"), subset(Dataset > $PC2, > source=="earlies_gap"), subset(Dataset$PC3, source=="earlies_gap"), > col=3, > pch=3) > > -jh > > [[alternative HTML version deleted]]-- David Winsemius, MD West Hartford, CT
Jack,
There is no pch= argument for plot3d() or points3d(). You can change the
color and the size of the symbols. Or you can use characters as symbols
using text3d(). I found that suggestion by searching the rhelp archives.
It is helpful to share code that will work.
x <- c(-4, -2, 0, 2, 4)
y <- c(-4, 0, 2, -3, 1)
z <- c(-2, 6, -3, 5, 5)
library(rgl)
plot3d(x, y, z, xlim=c(-5,7), ylim=c(-5,3), zlim=c(-4,7), xlab="PC1",
ylab="PC2", zlab="PC3", col=1, type="n")
text3d(x, y, z, col=1, "o")
text3d(x+1, y+0.5, z, col=2, "*")
text3d(x-0.5, y, z-0.5, col=3, "w")
Jean
`·.,, ><(((º> `·.,, ><(((º> `·.,, ><(((º>
Jean V. Adams
Statistician
U.S. Geological Survey
Great Lakes Science Center
223 East Steinfest Road
Antigo, WI 54409 USA
From:
jack hietpas <mikroskop@gmail.com>
To:
r-help@r-project.org
Date:
07/29/2011 03:04 PM
Subject:
[R] change pch in 3dplot, export graph
Sent by:
r-help-bounces@r-project.org
Hello I was wondering if anyone has been able to change the pch value for
points in 3dplot()? I am able to change point colors just not symbol
types.
I have included a portion of my code below. I realize this won't work
outside of my script, but thought, maybe there is something obvious that I
am doing wrong. Also is it possible to utilize the interactive feature
of
3dplot in a powerpoint, perhaps there is some sort of file format that the
graph could be exported to? Any suggestions would be very much
appreciated.
Thanks in advance,
library(rgl, pos=4)
plot3d(subset(Dataset$PC1, source=="ashe_amphib"), subset(Dataset$PC2,
source=="ashe_amphib"), subset(Dataset$PC3,
source=="ashe_amphib"),
xlim=c(-5,7), ylim=c(-5,3), zlim=c(-4,7), xlab="PC1",
ylab="PC2",
zlab="PC3", col=1, pch=1)
points3d(subset(Dataset$PC1, source=="ashe_ZAS"), subset(Dataset$PC2,
source=="ashe_ZAS"), subset(Dataset$PC3,
source=="ashe_ZAS"), col=2,
pch=2)
points3d(subset(Dataset$PC1, source=="earlies_gap"),
subset(Dataset$PC2,
source=="earlies_gap"), subset(Dataset$PC3,
source=="earlies_gap"), col=3,
pch=3)
-jh
[[alternative HTML version deleted]]
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide
http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
[[alternative HTML version deleted]]