MVAfacebank10 (R 2.13.1)

MVAfacebank10 computes Flury faces for the Swiss bank notes data ("bank2.dat"). Interesting plot is obtained for obs 91-110.

Download File

Click the button to demonstrate a graph view. 
Notice: This content requires Java Runtime Environment.
Java Applet and JavaScript should be allowed on your browser.

Mon, May 14 2012 by Dedy Dwi Prastyo

-


Description: -


rm(list=ls(all=TRUE))
graphics.off()
install.packages("aplpack") 
library(aplpack)
x = read.table("bank2.dat")
xx = x[91:110,]
ncolors=15
faces(xx, nrow = 4,face.type=1,scale=TRUE, col.nose = rainbow(ncolors), col.eyes = rainbow(ncolors, 
         start = 0.6, end = 0.85), col.hair = terrain.colors(ncolors), 
     col.face = heat.colors(ncolors), col.lips = rainbow(ncolors, 
         start = 0, end = 1), col.ears = rainbow(ncolors, start = 0, 
         end = 0.8), plot.faces = TRUE)