FerreiraEg13.2: Dados Simulados para Classifica<c3><a7><c3><a3>o

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

Description

Dados provenientes de simula<c3><a7><c3><a3>o. Foram 50 dados simulados de duas popula<c3><a7><c3><b5>es, P1 e P2, definidas pelos modelos probabil<c3><ad>sticos exponenciais P1 \sim Exp(1) e P2 \sim Exp(0,1). O objetivo da simula<c3><a7><c3><a3>o <c3><a9> explorar os m<c3><a9>todos de classifica<c3><a7><c3><a3>o.

Format

Um data.frame com 50 observa<c3><a7><c3><b5>es e 2 vari<c3><a1>veis, em que

pop

Fator de dois n<c3><ad>veis que representa a qual popula<c3><a7><c3><a3>o a observa<c3><a7><c3><a3>o pertence: 1 se P1 e 2 se P2.

x

Realiza<c3><a7><c3><a3>o da vari<c3><a1>vel aleat<c3><b3>ria P_i, \quad i = 1 ou 2 conforme pop

Source

FERREIRA (2011), Exemplo 13.2, p<c3><a1>g. 592-593.

Examples

data(FerreiraEg13.2)
str(FerreiraEg13.2)
summary(FerreiraEg13.2)

library(lattice)
library(latticeExtra)

densityplot(~x, groups = pop, data = FerreiraEg13.2,
            grid = TRUE, lwd = 2,
            auto.key = list(
                title = "Popula<c3><a7><c3><a3>o", cex.title = 1,
                corner = c(0.95, 0.90), points = FALSE))

ecdfplot(~x, groups = pop, data = FerreiraEg13.2,
         grid = TRUE, lwd = 2,
         auto.key = list(
             title = "Popula<c3><a7><c3><a3>o", cex.title = 1,
             corner = c(0.95, 0.05), points = FALSE))

(discr <- MASS::lda(pop ~ ., data = FerreiraEg13.2))

table(predict(discr)$class, FerreiraEg13.2$pop)

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