Internal function to simulate one meiosis
breeding.intern6(
  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,
  recombination.function = MoBPS::recombination.function.haldane,
  dup_activ = TRUE,
  rt_activ = TRUE,
  grandsib_activ = TRUE
)Inherited parent gamete
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]]
Function used to calculate position of recombination events (default: MoBPS::recombination.function.haldane())
Internal parameter to check if duplications have to be simulated
Internal parameter to check if RTs have to be simulated
Internal parameter to check if grandsibling contributions have to be calculated
data(ex_pop)
child_gamete <- breeding.intern6(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