decathlon88 {snha}

Men Decathlon data from the 1988 Olympics

Description

A subset of data from the Decathlon from the 1988 Olympic games. Included are all athletes which finished with more than 7000 points.

Usage

decathlon88

Format

A data frame with 33 rows and 10 columns:

disc

discus results in m

high

high jump results in m

jave

javelin through results in m

long

long jump results in m

pole

pole vault results in m

shot

shot put results in m

X100

running speed over 100m in km/h

X110

running speed over 110m hurdles in km/h

X1500

running speed over 1500m in km/h

X400

running speed over 400m in km/h

Source

<https://en.wikipedia.org/wiki/Athletics_at_the_1988_Summer_Olympics_-_Men's_decathlon>

Examples

data(decathlon88)
head(decathlon88)
A=snha(decathlon88,method="spearman",alpha=0.1)
cols=rep("salmon",10)
cols[names(A$data) %in% c("jave","shot","disc","pole")]="skyblue"
plot(A,layout="sam",vertex.color=cols,vertex.size=8,cex=1.2,edge.width=5)
snha_rsquare(A)