TTQuanti_continuous_var_pleio Class Reference

TTQuanti_continuous_var_pleio : variable pleiotropy. More...

#include <ttquanti.h>

Inheritance diagram for TTQuanti_continuous_var_pleio:

Collaboration diagram for TTQuanti_continuous_var_pleio:

Public Member Functions
	TTQuanti_continuous_var_pleio ()
	TTQuanti_continuous_var_pleio (const TTQuanti_continuous_var_pleio &TT)
virtual	~TTQuanti_continuous_var_pleio ()
unsigned int	get_sequence_block_size (unsigned int from, unsigned int to)
virtual void	init_sequence ()
virtual TTQuanti_continuous_var_pleio *	clone ()
virtual void	show_up ()
virtual double	get_additive_genotype (const unsigned int trait) const
virtual double	get_dominant_genotype (const unsigned int trait) const
virtual void	copy_sequence_block (sex_t SEX, unsigned int strand, unsigned int from_locus, unsigned int to_locus, const TTQuanti *parent)
virtual void	copy_sequence_1locus (sex_t SEX, unsigned int strand, unsigned int at, const TTQuanti *parent)
Public Member Functions inherited from TTQuanti_continuous
	TTQuanti_continuous ()
	TTQuanti_continuous (const TTQuanti &T)
virtual	~TTQuanti_continuous ()
virtual void	reset ()
virtual void	init ()
virtual void	set_sequence (void **seq)
virtual void **	get_sequence () const
virtual double	get_allele_value (int loc, int all) const
virtual void	set_allele_value (unsigned int locus, unsigned int allele, double value)
virtual TTQuanti_continuous &	operator= (const TTrait &T)
virtual bool	operator== (const TTrait &T)
virtual bool	operator!= (const TTrait &T)
virtual void	store_data (BinaryStorageBuffer *saver)
virtual bool	retrieve_data (BinaryStorageBuffer *reader)
virtual double	get_full_genotype (unsigned int trait)
virtual void	set_allele (int locus, int allele, double value)
virtual void	mutate_add (unsigned int position, unsigned int allele, double value)
virtual void	mutate_inplace (unsigned int position, unsigned int allele, double value)
virtual bool	get_allele_bit (unsigned int position, unsigned int allele) const
virtual void	set_allele_bit (unsigned int position, unsigned int allele, bool value)
Public Member Functions inherited from TTQuanti
	TTQuanti ()
	TTQuanti (const TTQuanti &T)
virtual	~TTQuanti ()
virtual trait_t	get_type () const
virtual void	mutate ()
virtual void	inherit (const TTrait *mother, const TTrait *father)
virtual void *	set_trait (void *value)
virtual void	set_value ()
virtual void *	getValue () const
void	set_proto (TProtoQuanti *proto)
TProtoQuanti *	get_proto ()
double	get_phenotype (unsigned int trai)
void	set_phenotype (unsigned int trait, double value)
Public Member Functions inherited from TTrait
virtual	~TTrait ()
Public Member Functions inherited from StorableComponent
virtual	~StorableComponent ()

Additional Inherited Members
Protected Attributes inherited from TTQuanti_continuous
double **	_sequence
Protected Attributes inherited from TTQuanti
double *	_phenotypes
TProtoQuanti *	_myProto

Detailed Description

TTQuanti_continuous_var_pleio : variable pleiotropy.

Constructor & Destructor Documentation

TTQuanti_continuous_var_pleio() [1/2]

TTQuanti_continuous_var_pleio::TTQuanti_continuous_var_pleio ( )

inline

: TTQuanti_continuous() {}

Referenced by clone().

TTQuanti_continuous_var_pleio() [2/2]

TTQuanti_continuous_var_pleio::TTQuanti_continuous_var_pleio ( const TTQuanti_continuous_var_pleio &  TT )

inline

: TTQuanti_continuous(TT) {}

~TTQuanti_continuous_var_pleio()

virtual TTQuanti_continuous_var_pleio::~TTQuanti_continuous_var_pleio ( )

inlinevirtual

{}

Member Function Documentation

clone()

virtual TTQuanti_continuous_var_pleio* TTQuanti_continuous_var_pleio::clone ( )

inlinevirtual

Implements TTrait.

{return new TTQuanti_continuous_var_pleio(*this);}

References TTQuanti_continuous_var_pleio().

copy_sequence_1locus()

void TTQuanti_continuous_var_pleio::copy_sequence_1locus ( sex_t  SEX, unsigned int  strand, unsigned int  at, const TTQuanti *  parent  )

inlinevirtual

Implements TTQuanti.

{
  const double *orig = (const double*)parent->get_sequence()[strand];
  double *seq = _sequence[SEX];
  unsigned int from_pos = _myProto->get_locus_start_pos(at);
  size_t size = _myProto->get_locus_PD(at) * _myProto->get_size_locus_type();
 
  memcpy(&seq[from_pos], &orig[from_pos], size);
}

References TTQuanti::_myProto, TTQuanti_continuous::_sequence, TProtoQuanti::get_locus_PD(), TProtoQuanti::get_locus_start_pos(), TTrait::get_sequence(), and TProtoQuanti::get_size_locus_type().

copy_sequence_block()

void TTQuanti_continuous_var_pleio::copy_sequence_block ( sex_t  SEX, unsigned int  strand, unsigned int  from_locus, unsigned int  to_locus, const TTQuanti *  parent  )

inlinevirtual

Implements TTQuanti.

{
  const double *orig = (const double*)parent->get_sequence()[strand];
  double *seq = _sequence[SEX];
  unsigned int from_pos = _myProto->get_locus_start_pos(from_locus);
 
  size_t block_size = get_sequence_block_size(from_locus, to_locus);
 
  memcpy(&seq[from_pos], &orig[from_pos], block_size);
 
}

References TTQuanti::_myProto, TTQuanti_continuous::_sequence, TProtoQuanti::get_locus_start_pos(), TTrait::get_sequence(), and get_sequence_block_size().

get_additive_genotype()

double TTQuanti_continuous_var_pleio::get_additive_genotype ( const unsigned int  trait ) const

inlinevirtual

Implements TTQuanti.

{
  double genotype = 0;
  unsigned int L = _myProto->get_num_locus(trait), pos;
 
  for(unsigned int j = 0; j < L; ++j) { // each trait can be affected by a different number of loci
    // alleles are ordered locus-trait: seq[0]:l0t0,l0t1,l0t2, ..., l1t0,l1t1,l1t2, ...
    pos = _myProto->get_locus_seq_pos(j, trait);
    genotype += _sequence[0][pos] + _sequence[1][pos];
  }
 
  return genotype;
}

References TTQuanti::_myProto, TTQuanti_continuous::_sequence, TProtoQuanti::get_locus_seq_pos(), and TProtoQuanti::get_num_locus().

get_dominant_genotype()

double TTQuanti_continuous_var_pleio::get_dominant_genotype ( const unsigned int  trait ) const

inlinevirtual

Implements TTQuanti.

{
  double genotype = 0;
  unsigned int L = _myProto->get_num_locus(trait), pos, locID;
 
  for(unsigned int j = 0; j < L; ++j) {
    pos = _myProto->get_locus_seq_pos(j, trait);
    locID = _myProto->get_locus_ID(j, trait);
    genotype += _myProto->get_genotype_with_dominance(_sequence[0][pos] ,
        _sequence[1][pos], locID, trait);
  }
 
  return genotype;
}

References TTQuanti::_myProto, TTQuanti_continuous::_sequence, TProtoQuanti::get_genotype_with_dominance(), TProtoQuanti::get_locus_ID(), TProtoQuanti::get_locus_seq_pos(), and TProtoQuanti::get_num_locus().

get_sequence_block_size()

unsigned int TTQuanti_continuous_var_pleio::get_sequence_block_size ( unsigned int  from, unsigned int  to  )

inline

{
  unsigned int size = 0;
  assert(to > from);
 
  for (unsigned int i = from; i < to; ++i) {
 
    size += _myProto->get_locus_PD(i);  // count number of allelic values to copy
 
  }
  return size * _myProto->get_size_locus_type(); // multiply with number of bytes used to store allele values
}

References TTQuanti::_myProto, TProtoQuanti::get_locus_PD(), and TProtoQuanti::get_size_locus_type().

Referenced by copy_sequence_block().

init_sequence()

void TTQuanti_continuous_var_pleio::init_sequence ( )

inlinevirtual

Implements TTrait.

{
//  cout << "TTQuanti_var_pleio::init_sequence\n";
 
  //options:
  //0: no variation, init value = (trait value)/(2*_num_locus)
  //1: init value = (trait value)/(2*_num_locus) + 1 mutation/locus
  //2: init value = (trait value)/(2*_num_locus) + random deviate ~N(0, _init_variance/2*_num_locus)
 
  //Note: the initial values may have been set individually by LCE_quanti
  //      it wouldn't make sense then to store the init values in the prototype
  //      because init values are set patch-specific by LCE_quanti
  //      Problem: without LCE_quanti, the original init values must not change from one replicate
  //      to the other, so we use a local variable
 
 
  //set the allele values from the trait value and the pleiotropic degree of each locus
  double myinit, initSD;
 
  for(unsigned int t = 0; t < _myProto->get_num_traits(); ++t){ // process trait-wise
 
    myinit = _myProto->get_init_value(t) / (2*_myProto->get_num_locus(t)); //(2 * ttable[i].size()); //divide by num loci affecting that trait
 
    initSD = sqrt(_myProto->get_init_variance(t)/(2*_myProto->get_num_locus(t)));
 
    for(unsigned int i = 0; i < _myProto->get_num_locus(t); ++i){
      _sequence[0][ _myProto->get_locus_seq_pos(i, t) ] = myinit;
      _sequence[1][ _myProto->get_locus_seq_pos(i, t) ] = myinit; //ttable[i][j]
    }
    //add a random deviate to initial additive effect
    if(_myProto->get_doInitMutation() == 2) {
      for(unsigned int i = 0; i < _myProto->get_num_locus(t); i++) {
        _sequence[0][ _myProto->get_locus_seq_pos(i, t) ] += RAND::Gaussian(initSD);
        _sequence[1][ _myProto->get_locus_seq_pos(i, t) ] += RAND::Gaussian(initSD);
      } // end for_num_locus
    } // end if_doInit == 2
 
  }
  //add random effects to allele values
  if(_myProto->get_doInitMutation() == 1) {
 
    double *mut;
 
    for(unsigned int i = 0; i < _myProto->get_num_locus(); i++) {
 
      mut = _myProto->getMutationEffectsVarPleio(i); // returns as many values as the locus' PD
 
      for(unsigned int j = 0; j < _myProto->get_locus_PD(i); j++){
        //mutate only one of the alleles, randomly
        _sequence[RAND::RandBool()][ _myProto->get_locus_start_pos(i) + j ] += mut[j];
      }
    }
  } // end init model 1
 
}

References TTQuanti::_myProto, TTQuanti_continuous::_sequence, RAND::Gaussian(), TProtoQuanti::get_doInitMutation(), TProtoQuanti::get_init_value(), TProtoQuanti::get_init_variance(), TProtoQuanti::get_locus_PD(), TProtoQuanti::get_locus_seq_pos(), TProtoQuanti::get_locus_start_pos(), TProtoQuanti::get_num_locus(), TProtoQuanti::get_num_traits(), TProtoQuanti::getMutationEffectsVarPleio(), and RAND::RandBool().

show_up()

void TTQuanti_continuous_var_pleio::show_up ( )

virtual

Implements TTrait.

{
  message("\
          Trait's type: QUANTI (continuous, variable pleiotropy)\n\
          traits: %i\n\
          loci: %i\n\
          seq length: %i\n",_myProto->get_num_traits(),_myProto->get_num_locus()
          ,_myProto->get_seq_length());
 
  for(unsigned int i = 0; i < _myProto->get_num_traits(); i++)
    message("phenotype %i: %f\n",i+1,_phenotypes[i]);
 
  message("genotype:");
 
   for(unsigned int i = 0; i < _myProto->get_num_traits(); ++i) {
 
     message("\ntrait %i (%i loci):\nloci: ",i+1, _myProto->get_num_locus(i));
 
     for(unsigned int j = 0; j < _myProto->get_num_locus(i); ++j) {
           message("%i, ", _myProto->get_locus_ID(j, i));
     }
 
     message("\n[0]: ");
 
     for(unsigned int j = 0; j < _myProto->get_num_locus(i); ++j) {
       message("%.3f,",_sequence[0][ _myProto->get_locus_seq_pos(j, i) ]);
     }
 
     message("\n[1]: ");
 
     for(unsigned int j = 0; j < _myProto->get_num_locus(i); ++j) {
       message("%.3f,",_sequence[1][ _myProto->get_locus_seq_pos(j, i) ]);
     }
   }
 
  message("\n");
 
}

References TTQuanti::_myProto, TTQuanti::_phenotypes, TTQuanti_continuous::_sequence, TProtoQuanti::get_locus_ID(), TProtoQuanti::get_locus_seq_pos(), TProtoQuanti::get_num_locus(), TProtoQuanti::get_num_traits(), TProtoQuanti::get_seq_length(), and message().

---

The documentation for this class was generated from the following files:

• ttquanti.h
• ttquanti.cc