PlotFaces
From DescTools v0.99.19
by Andri Signorell
Chernoff Faces
Plot Chernoff faces. The rows of a data matrix represent cases and the columns the variables.
 Keywords
 hplot
Usage
PlotFaces(xy, which.row, fill = FALSE, nrow, ncol, scale = TRUE, byrow = FALSE, main, labels, print.info=FALSE, col=NA)
Arguments
 xy

xy
data matrix, rows represent individuals and columns attributes.  which.row
 defines a permutation of the rows of the input matrix.
 fill
 logic. If set to
TRUE
, only the firstnc
attributes of the faces are transformed,nc
is the number of columns ofx
.  nrow
 number of columns of faces on graphics device
 ncol
 number of rows of faces
 scale
 logic. If set to
TRUE
, attributes will be normalized.  byrow

if(byrow==TRUE)
,x
will be transposed.  main
 title.
 labels
 character strings to use as names for the faces.
 print.info
 if
TRUE
information about usage of variables for face elements are printed.  col
 a vector of colors used for the parts of the faces. Default is NA, which will omit colors.
Details
The features paramters of this implementation are:
 1 height of face
 2 width of face
 3 shape of face
 4 height of mouth
 5 width of mouth
 6 curve of smile
 7 height of eyes
 8 width of eyes
 9 height of hair
 10 width of hair
 11 styling of hair
 12 height of nose
 13 width of nose
 14 width of ears
 15 height of ears
faces.pngSome faces
For details look at the literate program of faces
Value

a plot of faces is created on the graphics device,
no numerical results
Note
version 12/2003
References
Chernoff, H. (1973) The use of faces to represent statistiscal assoziation, JASA, 68, pp 361368.
The smooth curves are computed by an algorithm found in: Ralston, A. and Rabinowitz, P. (1985) A first course in numerical analysis, McGrawHill, pp 76ff. http://www.wiwi.unibielefeld.de/~wolf/: S/R  functions : faces
Examples
PlotFaces(rbind(1:3,5:3,3:5,5:7))
data(longley)
PlotFaces(longley[1:9,])
set.seed(17)
PlotFaces(matrix(sample(1:1000,128,),16,8),main="random faces")
means < lapply(iris[,5], tapply, iris$Species, mean)
m < t(do.call(rbind, means))
m < cbind(m, matrix(rep(1, 11*3), nrow=3))
PlotFaces(m, ncol=3, col=Pal("Tibco"))
Community examples
Looks like there are no examples yet.