On Sep 12, 2010, at 10:12 AM, Karl Brand wrote:
Esteemed useRs and developeRs,
I need to create a '3D line plot' (proper name?) of which an
excellent example can be viewed here:
http://cococubed.asu.edu/images/87a/images/unknown_pleasures.jpg
Set up blank plot region with proper ranges for x and ylim that could
be say 0:60 with the intent of scaling your 50 individual y ranges to
0-10
Scale your y values to be within 0-10
Fill plot area black:
Draw "from top down" using polygon with white lines at cex=2 and black
fill.
Then something along these lines:
for(ilevel in 0:50){ polygon(x,yscaled+50-ilevel, col="black",
border="white", lwd=2)}
#--- tested code----
opar <- par(bg="black")
set.seed(1)
Ldens <- vector(mode="list", 50)
for(i in 1:50) {
Ldens[[i]] <- density(rnorm(100), from=-3,to=3)
with(Ldens[[i]], polygon(x=c(x[c(1, 1:512, 512)]), y= c(0, 50-i
+20*y[1:512], 0),
col="black", border="white"))
}
par(opar)
#-------------
Got any data?
--
David.
I have some experience using the rgl package to create 3D PCA plots,
but have no idea where to start for an image like this.
I'd really appreciate suggestions & help on how might achieve this
using R,
Karl
--
Karl Brand
--
David Winsemius, MD
West Hartford, CT
______________________________________________
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.
