arm (version 1.0-1)

corrplot: Function for Making Correlation Plot

Description

Function for making a correlation plot starting from a data matrix

Usage

corrplot (data, var.names=NULL, details=TRUE, n.col.legend=5, cex.col=0.7, 
    cex.var=0.9, digits=1, color=FALSE, abs=FALSE,...)

Arguments

data

a data matrix

var.names

variable names of the data matrix, if not provided use default variable names

details

show more than one digits correlaton values. Default is true. FALSE is suggested to get readable output.

n.col.legend

number of legend for the color thermometer

cex.col

font size of the color thermometer

cex.var

font size of the variable names

digits

number of digits shown in the text of the color theromoeter

color

default is FALSE, which uses gray scale

abs

if TRUE, transform all correlation values into positive values

...

other plot options may be passed to this function

Value

• A correlation plot.

Details

The function adapts the R function for Figure 8 in Tian Zheng, Matthew Salganik, and Andrew Gelman, 2006, "How many people do you know in prison?: using overdispersion in count data to estimate social structure in networks", Journal of the American Statistical Association, Vol.101, N0. 474: p.409-23.

References

Tian Zheng, Matthew Salganik, and Andrew Gelman, 2006, "How many people do you know in prison?: using overdispersion in count data to estimate social structure in networks", Journal of the American Statistical Association, Vol.101, N0. 474: p.409-23

See Also

cor, par

Examples

x1 <- rnorm(1000,50,2) 
 x2 <- rbinom(1000,1,prob=0.63) 
 x3 <- rpois(1000, 2) 
 x4 <- runif(1000,40,100) 
 x5 <- rnorm(1000,100,30)
 x6 <- rbeta(1000,2,2) 
 x7 <- rpois(1000,10) 
 x8 <- rbinom(1000,1,prob=0.4) 
 x9 <- rbeta(1000,5,4) 
 x10 <- runif(1000,-10,-1) 

 test.data <- data.matrix(cbind(x1,x2,x3,x4,x5,x6,x7,x8,x9,x10))
 test.names <- c("a short name01","a short name02","a short name03",
                 "a short name04","a short name05","a short name06",
                 "a short name07","a short name08","a short name09",
                 "a short name10")
 
 #test 1
 corrplot(test.data)
 
 #test 2
 corrplot(test.data,test.names,n.col.legend=7)