swissbanknotes {fsdaR}

Swiss banknote data

Description

Six variables measured on 100 genuine and 100 counterfeit old (printed before the second world war) Swiss 1000-franc bank notes (Flury and Riedwyl, 1988).

Usage

data(swissbanknotes)

Format

A data frame with 200 observations on the following 7 variables.

length

Length of bill, mm

left

Width of left edge, mm

right

Width of right edge, mm

bottom

Bottom margin width, mm

top

Top margin width, mm

diagonal

Length of image diagonal, mm

class

1 = genuine, 2 = counterfeit

Source

Flury, B. and Riedwyl, H. (1988). Multivariate Statistics: A practical approach. London: Chapman & Hall.

References

Weisberg, S. (2005). Applied Linear Regression, 3rd edition. New York: Wiley, Problem 12.5.

Examples

library(rrcov)
data(swissbanknotes)
head(swissbanknotes)
plot(CovMcd(swissbanknotes[, 1:6]), which="pairs", col=swissbanknotes$class)