nQtl | R Documentation |
Makes a matrix indicating how many QTLs were activated for each solution.
nQtl(object)
object |
Object returned by the evolafit function. |
A simple apply function to count the number of active QTLs per solution (row) per trait (columns).
a matrix
Giovanny Covarrubias-Pazaran (2024). evola: a simple evolutionary algorithm for complex problems. To be submitted to Bioinformatics.
evolafit
– the core function of the package
set.seed(1)
# Data
Gems <- data.frame(
Color = c("Red", "Blue", "Purple", "Orange",
"Green", "Pink", "White", "Black",
"Yellow"),
Weight = round(runif(9,0.5,5),2),
Value = round(abs(rnorm(9,0,5))+0.5,2),
Times=c(rep(1,8),0)
)
head(Gems)
# Task: Gem selection.
# Aim: Get highest combined value.
# Restriction: Max weight of the gem combined = 10.
# simple specification
res00<-evolafit(formula=cbind(Weight,Value)~Color, dt= Gems,
# constraints on traits: if greater than this ignore
constraintsUB = c(10,Inf), nGenerations = 10
)
nQtl(res00)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.