RamalhoEg12.10: Ensaio Dialelo para o Tempo At<c3><a9> o Florescimento do...

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

Description

Dados referentes ao cruzamento dialelo realizado por Arriel et al. (1993), em que foi avaliado o n<c3><ba>mero de dias para o florescimento do feijoeiro para cada progenie.

Format

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

prog1

Inteiro que indica o progenitor 1 do cruzamento.

prog2

Inteiro que indica o progenitor 2 do cruzamento.

dias

N<c3><ba>mero m<c3><a9>dio de dias para o florescimento do feijoeiro.

Source

RAMALHO et al. (2005), Exemplo 12.10, p<c3><a1>g. 227.

Arriel, E., Ramalho, M. A. P., Pacheco, C. A. P. Expected and Realized Gains in the CMS-39 Maize Population after three Cycles of Selection. Revista Brasileira de Gen<c3><a9>tica. Ribeir<c3><a3>o Preto. v.16, n.4, p.1013. dez. 1993

Examples

str(RamalhoEg12.10)

RamalhoEg12.10

# N<c3><ba>mero de genitores.
n <- with(RamalhoEg12.10, unique(c(prog1, prog2)))
RamalhoEg12.10 <- transform(RamalhoEg12.10,
                            prog1 = factor(prog1, levels = n),
                            prog2 = factor(prog2, levels = n))

# Matriz do cruzamento dialelo.
X1 <- model.matrix(~0 + prog1, data = RamalhoEg12.10)
X2 <- model.matrix(~0 + prog2, data = RamalhoEg12.10)
X <- 0.5 * (X1 + X2)

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