COI | R Documentation |
Function for calculating the inbreeding coefficient
COI(var, VG, VF, generation = "all", verbose = FALSE)
var |
Column with the variable name |
VG |
Column with genotypic variance |
VF |
Column with phenotypic variance |
generation |
Parameter to select the generation. Use 'all' to get the parameters for all the generations or 'F3', 'F4', 'F5' and 'F6' for just one of the generations. |
verbose |
Logical argument. Runs the code silently if FALSE. |
Returns the total, additive and dominance variance values based on the variance components for a given variable.
Willyan Junior Adorian Bandeira
Ivan Ricardo Carvalho
Murilo Vieira Loro
Leonardo Cesar Pradebon
Jose Antonio Gonzalez da Silva
Falconer, D. S., & Mackay, T. F. C. (1996). Introduction to quantitative genetics (4th ed.). Longman.
library(EstimateBreed)
var <- c("A","B","C","D","E")
VF <- c(2.5, 3.0, 2.8, 3.2, 2.7)
VG <- c(1.2, 1.5, 1.3, 1.6, 1.4)
data <- data.frame(var,VG,VF)
#Calculating for all generations
inbr1 <- with(data,COI(var,VG,VF,generation = "all"))
#Calculating for just one generation
inbr2 <- with(data,COI(var,VG,VF,generation = "F3"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.