ManlyTb4.5: Cr<c3><a2>nios Eg<c3><ad>pcios

In pet-estatistica/labestData: Biblioteca de Dados para Aprendizado de Estatística

Description

Estudo em ancestrais de c<c3><a3>es da Tail<c3><a2>ndia, atrav<c3><a9>s de medi<c3><a7><c3><b5>es da mand<c3><ad>bula.

Format

Um data.frame com 5 grupo caninos e 10 vari<c3><a1>veis.

grup

Grupo canino.

compm

Comprimento da mand<c3><ad>bula (mm).

largmapm

Largura da mand<c3><ad>bula, abaixo do primeiro molar (mm).

largca

Largura do c<c3><b4>ndilo aricular (mm).

altmapm

Altura da mand<c3><ad>bula, abaixo do primeiro molar (mm).

comppm

Comprimento do primeiro molar (mm).

largpm

Largura do primeiro molar (mm).

compptm

Comprimento do primeiro ao terceiro molar (mm).

comppqp

Comprimento do primeiro ao quarto pr<c3><a9>-molar (mm).

largci

Largura do canino inferior (mm).

sexo

C<c3><b3>digo para sexo, (1 para masculino, 2 para feminino e caso contr<c3><a1>rio <c3><a9> desconhecido.

Source

MANLY (2005), p<c3><a1>g. 67 <c3><a0> 69.

See Also

Veja tamb<c3><a9>m ManlyTb1.4.

Examples

data(ManlyTb4.5)
str(ManlyTb4.5)

library(lattice)
library(reshape2)

ManlyTb4.5long <- melt(ManlyTb4.5[,-11], id.vars = "grup")

i <- c(1, 2, 3, 4, 6)
bwplot(value ~ grup | variable,
       data = ManlyTb4.5long,
       scales = c(list(relation = "free"),
                  list(x = list(draw = FALSE))),
       ylab = "",
       pch = "|",
       par.settings = list(box.umbrella = list(col = i),
                           box.dot = list(col = i),
                           box.rectangle = list(col = i)),
       key = list(points = list(col = i, pch = 19),
                  space = "top",
                  columns = 2,
                  text = list(c("C<c3><a3>es modernos da Tail<c3><a2>ndia",
                                "Chacais dourados",
                                "Cuons",
                                "Lobos indianos",
                                "Caes pr<c3><a9>-hist<c3><b3>ricos tailandeses"))))

pet-estatistica/labestData documentation built on May 25, 2019, 12:47 a.m.