knitr::opts_chunk$set( collapse = TRUE, comment = "#>", fig.path = "man/figures/README-", out.width = "100%" )
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.
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")
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)
genMat<- gen.varcov(data = seldata[,3:9], genotypes = seldata[,2], replication = seldata[,1]) print(genMat)
phenMat<- phen.varcov(data = seldata[,3:9], genotypes = seldata[,2], replication = seldata[,1]) print(phenMat)
weight
weightMat <- weight.mat(weight) weightMat
GAY<- gen.advance(phen_mat = phenMat[1,1], gen_mat = genMat[1,1], weight_mat = weightMat[1,1]) print(GAY)
For the construction of selection index we requires phenotypic &
genotypic variance-covariance matrix as well weight matrix.
comb.indices(ncomb = 1, pmat = phenMat, gmat = genMat, wmat = weight[,2:3], wcol = 1, GAY = GAY)
rcomb.indices(ncomb = 1, i = 1, pmat = phenMat, gmat = genMat, wmat = weight[,2:3], wcol = 1, GAY = GAY)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.