gorilla | R Documentation |
This is 29 male and 30 female gorillas' skull landmark data where each individual is represented as 8-ad/landmarks in 2 dimensions. This is a re-arranged version of the data from shapes package.
data(gorilla)
a named list containing
a 3d array of size (8\times 2\times 29)
a 3d array of size (8\times 2\times 30)
dryden_statistical_2016Riemann
Reno PL, Meindl RS, McCollum MA, Lovejoy CO (2003). "Sexual dimorphism in Australopithecus afarensis was similar to that of modern humans." Proceedings of the National Academy of Sciences, 100(16):9404–9409.
wrap.landmark
data(gorilla) # load the data riem.female = wrap.landmark(gorilla$female) # wrap as RIEMOBJ opar <- par(no.readonly=TRUE) for (i in 1:30){ if (i < 2){ plot(riem.female$data[[i]], cex=0.5, xlim=c(-1,1)/2, ylim=c(-2,2)/5, main="30 female gorilla skull preshapes", xlab="dimension 1", ylab="dimension 2") lines(riem.female$data[[i]]) } else { points(riem.female$data[[i]], cex=0.5) lines(riem.female$data[[i]]) } } par(opar)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.