Data Mining and Warehousing
Data Mining and Warehousing
INTRODUCTION -T h e C h e r n o f f F a c e s m e t h o d i s a d a t a v i s u a l i z a t i o n t e c h n i q u e
brought to us by the 70's. It was developed by Herman Chernoff to
represent multivariate data, ostensibly effectively representing up to 18
variables. Facial features (eyes, nose, eyebrows) are mapped to multiple
variables, with size, orientation, shape, color, and placement potentially
representing different attribut es of a single observation.
Faces do not make it eas y to present data without perceived bias. For
example, a curved mouth holds positive and negative connotations,
which must be considered in order to avoid unwanted implications.
Used for:
Detecting clusters
Representing multi-variate data
Disadvantages:
https://goo.gl/forms/7ki2xPBweB2txleq1
Responses
https://drive.google.com/open?id=1nkIJpdXW5vRFp8GtIK0-dKp66aAMOjfr
Code in R
install.packages("aplpack")
library(aplpack)
data$Gender<-as.numeric(data$Gender)
data$Age.of.the.Respondent<-as.numeric(data$Age.of.the.Respondent)
data$Which.category.of.footwear.u.buy.the.most..<-
as.numeric(data$Which.category.of.footwear.u.buy.the.most..)
data$How.many.pairs.of.footwear.you.have.purchased.in.last.six.months.<-
as.numeric(data$How.many.pairs.of.footwear.you.have.purchased.in.last.six.months.)
data$Which.brand.of.footwear.u.buy.often.<-
as.numeric(data$Which.brand.of.footwear.u.buy.often.)
data$On.which.attribute.is.your.buying.behavior.more.influenced.for.a.specific.brand.of.footw
ear.<-
as.numeric(data$On.which.attribute.is.your.buying.behavior.more.influenced.for.a.specific.bra
nd.of.footwear.)
data$Which.attribute.has.a.higher.level.of.importance.while.u.make.a.purchase.<-
as.numeric(data$Which.attribute.has.a.higher.level.of.importance.while.u.make.a.purchase.)
data$How.likely.do.you.recommend.your.current.brand.to.your.close.friends.<-
as.numeric(data$How.likely.do.you.recommend.your.current.brand.to.your.close.friends.)
data$Given.a.chance...would.you.switch.to.some.another.brand.of.footwear.<-
as.numeric(data$Given.a.chance...would.you.switch.to.some.another.brand.of.footwear.)
str(data)
faces(data[,2:10],labels = data$Name)
- MALVIKA SINGH
- 1893450