Displaying 4 results from an estimated 4 matches for "facetcol".
2009 Aug 30
3
Computer Modern Fonts in R graphic
...x*y}
> z <- outer(sn,sm,f)
>
> nrz <- nrow(z)
> ncz <- ncol(z)
> jet.colors <- colorRampPalette( c("yellow", "red") )
> nbcol <- 100
> color <- jet.colors(nbcol)
> zfacet <- z[-1, -1] + z[-1, -ncz] + z[-nrz, -1] + z[-nrz, -ncz]
> facetcol <- cut(zfacet, nbcol)
>
> CM <- Type1Font("CM",
> c("cm-lgc/fonts/afm/public/cm-lgc/fcmr8a.afm",
> "cm-lgc/fonts/afm/public/cm-lgc/fcmb8a.afm",
> "cm-lgc/fonts/afm/public/cm-l...
2011 Mar 18
0
keep color range constant across three persp() graphs
...matrix(1:100,10,10)
z2 <- matrix(seq(0.5,50,by=.5),10,10)
z <- z1
nrz <- nrow(z)
ncz <- ncol(z)
jet.colors <- colorRampPalette( c("yellow", "red") )
nbcol <- 100
color <- jet.colors(nbcol)
zfacet <- z[-1, -1] + z[-1, -ncz] + z[-nrz, -1] + z[-nrz, -ncz]
facetcol <- cut(zfacet, nbcol)
persp(x,y,z,col=color[facetcol], ticktype = "detailed", phi=30,theta=30)
##### Second Graph ###
z <- z2
nrz <- nrow(z)
ncz <- ncol(z)
jet.colors <- colorRampPalette( c("yellow", "red") )
nbcol <- 100
color <- jet.colors(nb...
2013 Jun 25
1
Correct scaling of axis in persp3d plot
...ot;#ffcccc", "#cc0000") )
# Generate the desired number of colors from this palette
nbcol <- 100
color <- jet.colors(nbcol)
# Compute the z-value at the facet centres
zfacet <- z[-1, -1] + z[-1, -ncz] + z[-nrz, -1] + z[-nrz, -ncz]
# Recode facet z-values into color indices
facetcol <- cut(zfacet, nbcol)
persp3d(x, y, z, theta=50, phi=25, expand=0.75, col=color[facetcol],
ticktype="detailed", xlab="", ylab="time", zlab="",axes=TRUE)
Thanks a lot for your help,
Ivanov
2009 Sep 01
1
Logistic Politomic Regression in R
...x*y}
> z <- outer(sn,sm,f)
>
> nrz <- nrow(z)
> ncz <- ncol(z)
> jet.colors <- colorRampPalette( c("yellow", "red") )
> nbcol <- 100
> color <- jet.colors(nbcol)
> zfacet <- z[-1, -1] + z[-1, -ncz] + z[-nrz, -1] + z[-nrz, -ncz]
> facetcol <- cut(zfacet, nbcol)
>
> CM <- Type1Font("CM",
> c("cm-lgc/fonts/afm/public/cm-lgc/fcmr8a.afm",
> "cm-lgc/fonts/afm/public/cm-lgc/fcmb8a.afm",
> "cm-lgc/fonts/afm/public/cm-l...