powered by
Internal function to simulate one meiosis
breeding.intern( info.parent, parent, population, mutation.rate = 10^-5, remutation.rate = 10^-5, recombination.rate = 1, recom.f.indicator = NULL, duplication.rate = 0, duplication.length = 0.01, duplication.recombination = 1, delete.same.origin = FALSE, gene.editing = FALSE, nr.edits = 0, gen.architecture = 0, decodeOriginsU = MoBPS::decodeOriginsR )
position of the parent in the dataset
list of information regarding the parent
Population list
Mutation rate in each marker (default: 10^-5)
Remutation rate in each marker (default: 10^-5)
Average number of recombination per 1 length unit (default: 1M)
Use step function for recombination map (transform snp.positions if possible instead)
Share of recombination points with a duplication (default: 0 - DEACTIVATED)
Average length of a duplication (Exponentially distributed)
Average number of recombinations per 1 length uit of duplication (default: 1)
If TRUE delete recombination points when genetic origin of adjacent segments is the same
If TRUE perform gene editing on newly generated individual
Number of edits to perform per individual
Used underlying genetic architecture (genome length in M)
Used function for the decoding of genetic origins [[5]]/[[6]]
Inherited parent gamete
# NOT RUN { data(ex_pop) child_gamete <- breeding.intern(info.parent = c(1,1,1), parent = ex_pop$breeding[[1]][[1]][[1]], population = ex_pop) # }
Run the code above in your browser using DataLab