Nemo  2.4.0b
Simulate forward-in-time genetic evolution in a spatially explicit, individual-based stochastic simulator
TTQuanti_diallelic_bitstring_full_pleio_epistasis Class Reference

TTQuanti_diallelic_bitstring_full_pleio_epistasis : pleiotropic di-allelic bitstring with epistasis. More...

#include <ttquanti_epistasis.h>

+ Inheritance diagram for TTQuanti_diallelic_bitstring_full_pleio_epistasis:
+ Collaboration diagram for TTQuanti_diallelic_bitstring_full_pleio_epistasis:

Public Member Functions

 TTQuanti_diallelic_bitstring_full_pleio_epistasis ()
 
 TTQuanti_diallelic_bitstring_full_pleio_epistasis (const TTQuanti_diallelic_bitstring_full_pleio_epistasis &TT)
 
virtual ~TTQuanti_diallelic_bitstring_full_pleio_epistasis ()
 
virtual void init_sequence ()
 
virtual TTQuanti_diallelic_bitstring_full_pleio_epistasisclone ()
 
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 chromosome, unsigned int from_locus, unsigned int to_locus, const TTQuanti *parent)
 
virtual void copy_sequence_1locus (sex_t SEX, unsigned int chromosome, unsigned int at, const TTQuanti *parent)
 
double get_epistatic_genotype (const vector< double > &genotypes) const
 
- Public Member Functions inherited from TTQuanti_diallelic_bitstring
 TTQuanti_diallelic_bitstring ()
 
 TTQuanti_diallelic_bitstring (const TTQuanti &T)
 
virtual ~TTQuanti_diallelic_bitstring ()
 
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)
 
void set_bit_sequence (const bitstring *inseq)
 
const bitstringget_bit_sequence (bool chromosome) const
 
void inherit_free (const TTrait *mother, const TTrait *father)
 
virtual void reset ()
 
virtual void init ()
 
virtual void set_sequence (void **seq)
 
virtual void ** get_sequence () const
 
virtual unsigned int get_allele (int loc, int all) const
 
virtual double get_allele_value (int locus, int allele) const
 
virtual void set_allele_value (unsigned int locus, unsigned int allele, double value)
 
virtual TTQuanti_diallelic_bitstringoperator= (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 mutate_add (unsigned int position, unsigned int allele, double value)
 
virtual void mutate_inplace (unsigned int position, unsigned int allele, double 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)
 
TProtoQuantiget_proto ()
 
double get_phenotype (unsigned int trai)
 
void set_phenotype (unsigned int trait, double value)
 
void reset_phenotype_to_genotypic_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_diallelic_bitstring
bitstring_sequence
 
- Protected Attributes inherited from TTQuanti
double * _phenotypes
 
double * _genotypic_values
 
TProtoQuanti_myProto
 

Detailed Description

TTQuanti_diallelic_bitstring_full_pleio_epistasis : pleiotropic di-allelic bitstring with epistasis.

Constructor & Destructor Documentation

◆ TTQuanti_diallelic_bitstring_full_pleio_epistasis() [1/2]

TTQuanti_diallelic_bitstring_full_pleio_epistasis::TTQuanti_diallelic_bitstring_full_pleio_epistasis ( )
inline
TTQuanti_diallelic_bitstring()
Definition: ttquanti_bitstring.h:45

Referenced by clone().

◆ TTQuanti_diallelic_bitstring_full_pleio_epistasis() [2/2]

TTQuanti_diallelic_bitstring_full_pleio_epistasis::TTQuanti_diallelic_bitstring_full_pleio_epistasis ( const TTQuanti_diallelic_bitstring_full_pleio_epistasis TT)
inline
193  :

◆ ~TTQuanti_diallelic_bitstring_full_pleio_epistasis()

virtual TTQuanti_diallelic_bitstring_full_pleio_epistasis::~TTQuanti_diallelic_bitstring_full_pleio_epistasis ( )
inlinevirtual
196 {}

Member Function Documentation

◆ clone()

virtual TTQuanti_diallelic_bitstring_full_pleio_epistasis* TTQuanti_diallelic_bitstring_full_pleio_epistasis::clone ( )
inlinevirtual

Implements TTrait.

TTQuanti_diallelic_bitstring_full_pleio_epistasis()
Definition: ttquanti_epistasis.h:191

References TTQuanti_diallelic_bitstring_full_pleio_epistasis().

◆ copy_sequence_1locus()

void TTQuanti_diallelic_bitstring_full_pleio_epistasis::copy_sequence_1locus ( sex_t  SEX,
unsigned int  chromosome,
unsigned int  at,
const TTQuanti parent 
)
inlinevirtual

Implements TTQuanti.

1054 {
1055  const bitstring& orig = dynamic_cast<const TTQuanti_diallelic_bitstring*>(parent)->get_bit_sequence((bool)chromosome);
1056 
1057  size_t pos = _myProto->get_locus_start_pos(at);
1058 
1059  for(unsigned int i = 0; i < _myProto->get_num_traits(); ++i) {
1060  _sequence[SEX][pos] = orig[pos];
1061  pos++;
1062  }
1063 }
unsigned int get_num_traits()
Definition: ttquanti.h:423
unsigned int get_locus_start_pos(unsigned int locus)
Definition: ttquanti.h:458
TTQuanti_diallelic_bitstring.
Definition: ttquanti_bitstring.h:41
const bitstring & get_bit_sequence(bool chromosome) const
Definition: ttquanti_bitstring.h:56
bitstring * _sequence
Definition: ttquanti_bitstring.h:89
TProtoQuanti * _myProto
Definition: ttquanti.h:107
Non-template and faster implementation of std::bitset.
Definition: bitstring.h:57

References TTQuanti::_myProto, TTQuanti_diallelic_bitstring::_sequence, TTQuanti_diallelic_bitstring::get_bit_sequence(), TProtoQuanti::get_locus_start_pos(), and TProtoQuanti::get_num_traits().

◆ copy_sequence_block()

void TTQuanti_diallelic_bitstring_full_pleio_epistasis::copy_sequence_block ( sex_t  SEX,
unsigned int  chromosome,
unsigned int  from_locus,
unsigned int  to_locus,
const TTQuanti parent 
)
inlinevirtual

Implements TTQuanti.

1037 {
1038  assert(to_locus > from_locus);
1039 
1040  const bitstring& orig = dynamic_cast<const TTQuanti_diallelic_bitstring*>(parent)->get_bit_sequence((bool)chromosome);
1041 
1042  size_t block_size = (to_locus - from_locus)*_myProto->get_num_traits();
1043 
1044  size_t start_pos = _myProto->get_locus_start_pos(from_locus);
1045 
1046  _sequence[SEX].copy(orig, start_pos, start_pos + block_size);
1047 
1048 }
void copy(const bitstring &b)
Unchecked copy, assumes we have sames sizes.
Definition: bitstring.h:361

References TTQuanti::_myProto, TTQuanti_diallelic_bitstring::_sequence, bitstring::copy(), TTQuanti_diallelic_bitstring::get_bit_sequence(), TProtoQuanti::get_locus_start_pos(), and TProtoQuanti::get_num_traits().

◆ get_additive_genotype()

double TTQuanti_diallelic_bitstring_full_pleio_epistasis::get_additive_genotype ( const unsigned int  trait) const
inlinevirtual

Implements TTQuanti.

972 {
973  double genotype = 0;
974  unsigned int L = _myProto->get_num_locus(); //number of loci
975  unsigned int pos = _myProto->get_locus_seq_pos(0, trait); //starting position, all loci contiguous on the map
976  vector<double> genotypes(L,0);
977 
978  for(unsigned int j = 0; j < L; ++j) {
979  genotypes[j] = _myProto->get_seq_diallele_value( pos, _sequence[0][pos] ) + _myProto->get_seq_diallele_value( pos, _sequence[1][pos] );
980  pos += _myProto->get_num_traits(); // stride size on the genome (all loci affect each trait)
981  genotype += genotypes[j];
982  }
983 
984  return genotype + get_epistatic_genotype(genotypes);
985 }
double get_seq_diallele_value(unsigned int position, unsigned int allele)
Definition: ttquanti.h:438
unsigned int get_locus_seq_pos(unsigned int loc, unsigned int trait)
Definition: ttquanti.h:453
unsigned int get_num_locus()
Definition: ttquanti.h:424
double get_epistatic_genotype(const vector< double > &genotypes) const
Definition: ttquanti_epistasis.cc:1011

References TTQuanti::_myProto, TTQuanti_diallelic_bitstring::_sequence, get_epistatic_genotype(), TProtoQuanti::get_locus_seq_pos(), TProtoQuanti::get_num_locus(), TProtoQuanti::get_num_traits(), and TProtoQuanti::get_seq_diallele_value().

◆ get_dominant_genotype()

double TTQuanti_diallelic_bitstring_full_pleio_epistasis::get_dominant_genotype ( const unsigned int  trait) const
inlinevirtual

Implements TTQuanti.

990 {
991  double genotype = 0;
992  unsigned int L = _myProto->get_num_locus(); //number of loci
993  unsigned int pos = _myProto->get_locus_seq_pos(0, trait); //starting position
994  vector<double> genotypes(L,0);
995 
996  for(unsigned int j = 0; j < L; ++j) {
997  genotypes[j] = _myProto->get_genotype_with_dominance(
998  _myProto->get_seq_diallele_value( pos, _sequence[0][pos] ),
999  _myProto->get_seq_diallele_value( pos, _sequence[1][pos] ),
1000  j,
1001  trait);
1002  pos += _myProto->get_num_traits(); // stride size on the genome (all loci affect each trait)
1003  genotype += genotypes[j];
1004  }
1005 
1006  return genotype + get_epistatic_genotype(genotypes);
1007 }
double get_genotype_with_dominance(const double a1, const double a2, const unsigned int locus, const unsigned int trait)
Definition: ttquanti.cc:2539

References TTQuanti::_myProto, TTQuanti_diallelic_bitstring::_sequence, get_epistatic_genotype(), TProtoQuanti::get_genotype_with_dominance(), TProtoQuanti::get_locus_seq_pos(), TProtoQuanti::get_num_locus(), TProtoQuanti::get_num_traits(), and TProtoQuanti::get_seq_diallele_value().

◆ get_epistatic_genotype()

double TTQuanti_diallelic_bitstring_full_pleio_epistasis::get_epistatic_genotype ( const vector< double > &  genotypes) const
inline
1012 {
1013  double genotype = 0;
1014 
1015  const TMatrix& epi_loc_idx = _myProto->get_epi_coef_index();
1016  const TMatrix& epi_coef = _myProto->get_epi_coefs();
1017  unsigned int pos0, pos1;
1018 
1019  // now add the epistatic effects
1020  for(unsigned int i = 0; i < epi_coef.length() ; ++i) {
1021 
1022  // Note _epistatic_coefs_indices has dimensions [_nb_epi_coefs; 2]
1023  pos0 = epi_loc_idx.get(i,0);
1024  pos1 = epi_loc_idx.get(i,1);
1025 
1026  genotype += epi_coef.get(0,i) * double(genotypes[pos0]) * double(genotypes[pos1]);
1027 
1028  }
1029 
1030  return genotype;
1031 }
A class to handle matrix in params, coerces matrix into a vector of same total size.
Definition: tmatrix.h:50
double get(unsigned int i, unsigned int j) const
Accessor to element at row i and column j.
Definition: tmatrix.h:193
unsigned int length() const
Returns the number of elements in the matrix.
Definition: tmatrix.h:218
const TMatrix & get_epi_coefs() const
Definition: ttquanti.h:568
const TMatrix & get_epi_coef_index() const
Definition: ttquanti.h:569

References TTQuanti::_myProto, TMatrix::get(), TProtoQuanti::get_epi_coef_index(), TProtoQuanti::get_epi_coefs(), and TMatrix::length().

Referenced by get_additive_genotype(), and get_dominant_genotype().

◆ init_sequence()

void TTQuanti_diallelic_bitstring_full_pleio_epistasis::init_sequence ( )
inlinevirtual

Implements TTrait.

1068 {
1069  //options:
1070  //0: no variation, all alleles set to 0
1071  //1: max variation, randomly set alleles at each locus
1072  //2: no variation and initialize with opposite effect alleles at alternating loci.
1073 
1074  // initialize with 0 bit
1075  _sequence[0].reset();
1076  _sequence[1].reset();
1077 
1078  if (_myProto->get_doInitMutation() == 1) {
1079 
1080  for(unsigned int i = 0; i < _myProto->get_seq_length(); ++i) {
1081 
1082  // randomly set the allelic values
1083  _sequence[0][ i ] = RAND::RandBool();
1084  _sequence[1][ i ] = RAND::RandBool();
1085 
1086  }
1087 
1088  } else if (_myProto->get_doInitMutation() == 2) {
1089  //option 2; polarized di-allelic values; even locus set to +a, odd locus set to -a
1090 
1091  for(unsigned int t = 0; t < _myProto->get_num_traits(); ++t) {
1092  for(unsigned int i = 0; i < _myProto->get_num_locus(t); i++) { // process trait-wise
1093  // no need to set to 0 since it was initialized that way
1094  if(i%2) { // odd locus
1095  _sequence[1][ _myProto->get_locus_seq_pos(i, t) ].flip(); // set with the alternate/negative allele value
1096  _sequence[0][ _myProto->get_locus_seq_pos(i, t) ].flip();
1097  }
1098  }
1099 
1100  }
1101  }
1102 }
static bool RandBool()
Returns a random boolean.
Definition: Uniform.h:165
unsigned int get_seq_length()
Definition: ttquanti.h:427
unsigned int get_doInitMutation()
Definition: ttquanti.h:449
void flip(size_t n)
Flip the bit at n.
Definition: bitstring.h:347
void reset(size_t length)
Definition: bitstring.h:140

References TTQuanti::_myProto, TTQuanti_diallelic_bitstring::_sequence, bitstring::flip(), TProtoQuanti::get_doInitMutation(), TProtoQuanti::get_locus_seq_pos(), TProtoQuanti::get_num_locus(), TProtoQuanti::get_num_traits(), TProtoQuanti::get_seq_length(), RAND::RandBool(), and bitstring::reset().

◆ show_up()

void TTQuanti_diallelic_bitstring_full_pleio_epistasis::show_up ( )
virtual

Implements TTrait.

1107 {
1108  message("\
1109  Trait's type: QUANTI (diallelic bitstring, full pleiotropy with epistasis)\n\
1110  traits: %i\n\
1111  loci: %i\n\
1112  seq length: %i\n",_myProto->get_num_traits(),_myProto->get_num_locus()
1113  ,_myProto->get_seq_length());
1114 
1115  for(unsigned int i = 0; i < _myProto->get_num_traits(); i++)
1116  message("phenotype %i: %f\n",i+1,_phenotypes[i]);
1117 
1118  message("_sequence:");
1119 
1120  for(unsigned int i = 0; i < _myProto->get_num_traits(); ++i) {
1121 
1122  message("\nt%i (%i loci):\n[0]: ",i+1, _myProto->get_num_locus(i));
1123 
1124  for(unsigned int j = 0; j < _myProto->get_num_locus(i); ++j) {
1125  message("%.3f,", (double)_sequence[0][ _myProto->get_locus_seq_pos(j, i) ]);
1126  }
1127 
1128  message("\n[1]: ");
1129 
1130  for(unsigned int j = 0; j < _myProto->get_num_locus(i); ++j) {
1131  message("%.3f,", (double)_sequence[1][ _myProto->get_locus_seq_pos(j, i) ]);
1132  }
1133  }
1134 
1135  message("\n");
1136 
1137 }
double * _phenotypes
Definition: ttquanti.h:105
void message(const char *message,...)
Definition: output.cc:40

References TTQuanti::_myProto, TTQuanti::_phenotypes, TTQuanti_diallelic_bitstring::_sequence, 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:

Generated for Nemo v2.4.0b by  doxygen 1.9.1 -- Nemo is hosted on  Download Nemo

Locations of visitors to this page
Catalogued on GSR