phylosim (version 3.0.5)

setGenerateBy.GeneralInsertor: Set the function object used for generating inserts

Description

Set the function object used for generating inserts. The provided function must return a Sequence object whne called and must have the following arguments: process, length, target.seq, event.pos, insert.pos (see generateInsert.GeneralInsertor).

Usage

# S3 method for GeneralInsertor
setGenerateBy(this, value, ...)

Arguments

this

A GeneralInsertor object.

value

A function object.

...

Not used.

Value

The function object.

See Also

For more information see GeneralInsertor.

Examples

# NOT RUN {
	# create a GeneralInsertor object
	i<-GeneralInsertor(
		rate=0.5,
		propose.by=function(process){sample(c(5:10),1)}, # inserts between 5 and 10
		template.seq=NucleotideSequence(string="AAAAAAA")
	)

	# save insert generator
	old.gen<-getGenerateBy(i)
	# set a new insert generator
	i$generateBy<-function(
                           process,
                           length,
                           target.seq,
                           event.pos,
                           insert.pos){
                   return(NucleotideSequence(string="AATTGGCC"))
                   }
	# get the generator function
	i$generateBy
	# generate insert
	generateInsert(i)
	# restore old generator
	i$generateBy<-old.gen
	# generate insert
	generateInsert(i)
 
# }