output: github_document
editor_options:
markdown:
wrap: 72

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.path = "man/figures/README-",
  out.width = "100%"
)

selection.index

The goal of selection.index is to easily construct the selection index and based on the these indices select the plant traits for the overall improvement of the plant.

Installation

You can install the released version of selection.index from CRAN with:

install.packages("selection.index")

from github with:

devtools::install_github("zankrut20/selection.index")

Example

This is a basic example which shows you how to solve a common problem: Dataset seldata is included in package.

library(selection.index)
head(seldata)

Genotypic Variance-Covariance Matrix

genMat<- gen.varcov(data = seldata[,3:9], genotypes = seldata[,2],
                    replication = seldata[,1])
print(genMat)

Phenotypic Variance-Covariance Matrix

phenMat<- phen.varcov(data = seldata[,3:9], genotypes = seldata[,2],
                      replication = seldata[,1])
print(phenMat)

Weight Matrix - Data is included in package weight

weightMat <- weight.mat(weight)
weightMat

• Genetic gain of Yield

GAY<- gen.advance(phen_mat = phenMat[1,1], gen_mat = genMat[1,1],
                  weight_mat = weightMat[1,1])
print(GAY)

Construction of selection index/indices

For the construction of selection index we requires phenotypic & genotypic variance-covariance matrix as well weight matrix.

Construction of all possible selection indices for a character combinations

comb.indices(ncomb = 1, pmat = phenMat, gmat = genMat, wmat = weight[,2:3], wcol = 1, GAY = GAY)

Construction of selection indices by removing desired single character from the combinations

rcomb.indices(ncomb = 1, i = 1, pmat = phenMat, gmat = genMat, wmat = weight[,2:3], wcol = 1, GAY = GAY)