X-Git-Url: https://git.donarmstrong.com/?p=rsem.git;a=blobdiff_plain;f=SingleModel.h;h=b822f7dc6773c3b5d48e5a3898737bc5f59126fe;hp=76c54f1489e15cc87123ef0f3bb3d142c10062db;hb=refs%2Fheads%2Fmaster;hpb=a95154919f950f86de9104b2b9dcf1f0c7e83387 diff --git a/SingleModel.h b/SingleModel.h index 76c54f1..b822f7d 100644 --- a/SingleModel.h +++ b/SingleModel.h @@ -8,8 +8,11 @@ #include #include #include +#include +#include #include "utils.h" +#include "my_assert.h" #include "Orientation.h" #include "LenDist.h" #include "RSPD.h" @@ -61,7 +64,6 @@ public: mw = NULL; if (isMaster) { - ori = new Orientation(params.probF); gld = new LenDist(params.minL, params.maxL); if (mean >= EPSILON) { mld = new LenDist(params.mate_minL, params.mate_maxL); @@ -69,6 +71,7 @@ public: if (!estRSPD) { rspd = new RSPD(estRSPD); } } + ori = new Orientation(params.probF); if (estRSPD) { rspd = new RSPD(estRSPD, params.B); } pro = new Profile(params.maxL); npro = new NoiseProfile(); @@ -102,7 +105,14 @@ public: int readLen = read.getReadLength(); int fpos = (dir == 0 ? pos : totLen - pos - readLen); // the aligned position reported in SAM file, should be a coordinate in forward strand - assert(fpos >= 0 && fpos + readLen <= totLen && readLen <= totLen); + general_assert(fpos >= 0, "The alignment of read " + read.getName() + " to transcript " + itos(sid) + " starts at " + itos(fpos) + \ + " from the forward direction, which should be a non-negative number! " + \ + "It is possible that the aligner you use gave different read lengths for a same read in SAM file."); + general_assert(fpos + readLen <= totLen,"Read " + read.getName() + " is hung over the end of transcript " + itos(sid) + "! " \ + + "It is possible that the aligner you use gave different read lengths for a same read in SAM file."); + general_assert(readLen <= totLen, "Read " + read.getName() + " has length " + itos(readLen) + ", but it is aligned to transcript " \ + + itos(sid) + ", whose length (" + itos(totLen) + ") is shorter than the read's length!"); + int seedPos = (dir == 0 ? pos : totLen - pos - seedLen); // the aligned position of the seed in forward strand coordinates if (seedPos >= fullLen || ref.getMask(seedPos)) return 0.0; @@ -221,11 +231,11 @@ public: const LenDist& getGLD() { return *gld; } - void startSimulation(simul*, double*); - bool simulate(int, SingleRead&, int&); + void startSimulation(simul*, const std::vector&); + bool simulate(READ_INT_TYPE, SingleRead&, int&); void finishSimulation(); - double* getMW() { + const double* getMW() { assert(mw != NULL); return mw; } @@ -237,7 +247,7 @@ private: static const int read_type = 0; int M; - int N[3]; + READ_INT_TYPE N[3]; Refs *refs; double mean, sd; int seedLen; @@ -269,18 +279,23 @@ void SingleModel::estimateFromReads(const char* readFN) { for (int i = 0; i < 3; i++) if (N[i] > 0) { genReadFileNames(readFN, i, read_type, s, readFs); - ReadReader reader(s, readFs); + ReadReader reader(s, readFs, refs->hasPolyA(), seedLen); // allow calculation of calc_lq() function - int cnt = 0; + READ_INT_TYPE cnt = 0; while (reader.next(read)) { - mld != NULL ? mld->update(read.getReadLength(), 1.0) : gld->update(read.getReadLength(), 1.0); - if (i == 0) { npro->updateC(read.getReadSeq()); } - + if (!read.isLowQuality()) { + mld != NULL ? mld->update(read.getReadLength(), 1.0) : gld->update(read.getReadLength(), 1.0); + if (i == 0) { npro->updateC(read.getReadSeq()); } + } + else if (verbose && read.getReadLength() < seedLen) { + std::cout<< "Warning: Read "<< read.getName()<< " is ignored due to read length "<< read.getReadLength()<< " < seed length "<< seedLen<< "!"<< std::endl; + } + ++cnt; - if (verbose && cnt % 1000000 == 0) { printf("%d READS PROCESSED\n", cnt); } + if (verbose && cnt % 1000000 == 0) { std::cout<< cnt<< " READS PROCESSED"<< std::endl; } } - if (verbose) { printf("estimateFromReads, N%d finished.\n", i); } + if (verbose) { std::cout<< "estimateFromReads, N"<< i<< " finished."<< std::endl; } } mld != NULL ? mld->finish() : gld->finish(); @@ -315,17 +330,18 @@ void SingleModel::collect(const SingleModel& o) { npro->collect(*(o.npro)); } +//Only master node can call void SingleModel::read(const char* inpF) { int val; FILE *fi = fopen(inpF, "r"); if (fi == NULL) { fprintf(stderr, "Cannot open %s! It may not exist.\n", inpF); exit(-1); } - fscanf(fi, "%d", &val); + assert(fscanf(fi, "%d", &val) == 1); assert(val == model_type); ori->read(fi); gld->read(fi); - fscanf(fi, "%d", &val); + assert(fscanf(fi, "%d", &val) == 1); if (val > 0) { if (mld == NULL) mld = new LenDist(); mld->read(fi); @@ -334,16 +350,18 @@ void SingleModel::read(const char* inpF) { pro->read(fi); npro->read(fi); - fclose(fi); - - if (fscanf(fi, "%d", &M) == 1) { - mw = new double[M + 1]; - for (int i = 0; i <= M; i++) fscanf(fi, "%lf", &mw[i]); + if (fscanf(fi, "%d", &val) == 1) { + if (M == 0) M = val; + if (M == val) { + mw = new double[M + 1]; + for (int i = 0; i <= M; i++) assert(fscanf(fi, "%lf", &mw[i]) == 1); + } } fclose(fi); } +//Only master node can call. Only be called at EM.cpp void SingleModel::write(const char* outF) { FILE *fo = fopen(outF, "w"); @@ -363,7 +381,7 @@ void SingleModel::write(const char* outF) { npro->write(fo); if (mw != NULL) { - fprintf(fo, "%d\n", M); + fprintf(fo, "\n%d\n", M); for (int i = 0; i < M; i++) { fprintf(fo, "%.15g ", mw[i]); } @@ -373,7 +391,7 @@ void SingleModel::write(const char* outF) { fclose(fo); } -void SingleModel::startSimulation(simul* sampler, double* theta) { +void SingleModel::startSimulation(simul* sampler, const std::vector& theta) { this->sampler = sampler; theta_cdf = new double[M + 1]; @@ -387,7 +405,7 @@ void SingleModel::startSimulation(simul* sampler, double* theta) { npro->startSimulation(); } -bool SingleModel::simulate(int rid, SingleRead& read, int& sid) { +bool SingleModel::simulate(READ_INT_TYPE rid, SingleRead& read, int& sid) { int dir, pos, readLen, fragLen; std::string name; std::string readseq; @@ -420,9 +438,8 @@ bool SingleModel::simulate(int rid, SingleRead& read, int& sid) { } } - std::ostringstream stdout; - stdout<= OLEN && (mld == NULL ? gld->getMinL() : mld->getMinL()) >= seedLen); - - memset(mw, 0, sizeof(double) * (M + 1)); - mw[0] = 1.0; - - - probF = ori->getProb(0); - probR = ori->getProb(1); + double probF, probR; + + assert((mld == NULL ? gld->getMinL() : mld->getMinL()) >= seedLen); - for (int i = 1; i <= M; i++) { - RefSeq& ref = refs->getRef(i); - int totLen = ref.getTotLen(); - int fullLen = ref.getFullLen(); - double value = 0.0; - int minL, maxL; - int effL, pfpos; - int end = std::min(fullLen, totLen - seedLen + 1); - double factor; - - for (int seedPos = 0; seedPos < end; seedPos++) - if (ref.getMask(seedPos)) { - //forward - minL = gld->getMinL(); - maxL = std::min(gld->getMaxL(), totLen - seedPos); - pfpos = seedPos; - for (int fragLen = minL; fragLen <= maxL; fragLen++) { - effL = std::min(fullLen, totLen - fragLen + 1); - factor = (mld == NULL ? 1.0 : mld->getAdjustedCumulativeProb(std::min(mld->getMaxL(), fragLen), fragLen)); - value += probF * gld->getAdjustedProb(fragLen, totLen) * rspd->getAdjustedProb(pfpos, effL, fullLen) * factor; - } - //reverse - minL = gld->getMinL(); - maxL = std::min(gld->getMaxL(), seedPos + seedLen); - for (int fragLen = minL; fragLen <= maxL; fragLen++) { - pfpos = seedPos - (fragLen - seedLen); - effL = std::min(fullLen, totLen - fragLen + 1); - factor = (mld == NULL ? 1.0 : mld->getAdjustedCumulativeProb(std::min(mld->getMaxL(), fragLen), fragLen)); - value += probR * gld->getAdjustedProb(fragLen, totLen) * rspd->getAdjustedProb(pfpos, effL, fullLen) * factor; - } - } - - //for reverse strand masking - for (int seedPos = end; seedPos <= totLen - seedLen; seedPos++) { - minL = std::max(gld->getMinL(), seedPos + seedLen - fullLen + 1); - maxL = std::min(gld->getMaxL(), seedPos + seedLen); - for (int fragLen = minL; fragLen <= maxL; fragLen++) { - pfpos = seedPos - (fragLen - seedLen); - effL = std::min(fullLen, totLen - fragLen + 1); - factor = (mld == NULL ? 1.0 : mld->getAdjustedCumulativeProb(std::min(mld->getMaxL(), fragLen), fragLen)); - value += probR * gld->getAdjustedProb(fragLen, totLen) * rspd->getAdjustedProb(pfpos, effL, fullLen) * factor; - } - } + memset(mw, 0, sizeof(double) * (M + 1)); + mw[0] = 1.0; + + probF = ori->getProb(0); + probR = ori->getProb(1); + + for (int i = 1; i <= M; i++) { + RefSeq& ref = refs->getRef(i); + int totLen = ref.getTotLen(); + int fullLen = ref.getFullLen(); + double value = 0.0; + int minL, maxL; + int effL, pfpos; + int end = std::min(fullLen, totLen - seedLen + 1); + double factor; + + for (int seedPos = 0; seedPos < end; seedPos++) + if (ref.getMask(seedPos)) { + //forward + minL = gld->getMinL(); + maxL = std::min(gld->getMaxL(), totLen - seedPos); + pfpos = seedPos; + for (int fragLen = minL; fragLen <= maxL; fragLen++) { + effL = std::min(fullLen, totLen - fragLen + 1); + factor = (mld == NULL ? 1.0 : mld->getAdjustedCumulativeProb(std::min(mld->getMaxL(), fragLen), fragLen)); + value += probF * gld->getAdjustedProb(fragLen, totLen) * rspd->getAdjustedProb(pfpos, effL, fullLen) * factor; + } + //reverse + minL = gld->getMinL(); + maxL = std::min(gld->getMaxL(), seedPos + seedLen); + for (int fragLen = minL; fragLen <= maxL; fragLen++) { + pfpos = seedPos - (fragLen - seedLen); + effL = std::min(fullLen, totLen - fragLen + 1); + factor = (mld == NULL ? 1.0 : mld->getAdjustedCumulativeProb(std::min(mld->getMaxL(), fragLen), fragLen)); + value += probR * gld->getAdjustedProb(fragLen, totLen) * rspd->getAdjustedProb(pfpos, effL, fullLen) * factor; + } + } - mw[i] = 1.0 - value; + //for reverse strand masking + for (int seedPos = end; seedPos <= totLen - seedLen; seedPos++) { + minL = std::max(gld->getMinL(), seedPos + seedLen - fullLen + 1); + maxL = std::min(gld->getMaxL(), seedPos + seedLen); + for (int fragLen = minL; fragLen <= maxL; fragLen++) { + pfpos = seedPos - (fragLen - seedLen); + effL = std::min(fullLen, totLen - fragLen + 1); + factor = (mld == NULL ? 1.0 : mld->getAdjustedCumulativeProb(std::min(mld->getMaxL(), fragLen), fragLen)); + value += probR * gld->getAdjustedProb(fragLen, totLen) * rspd->getAdjustedProb(pfpos, effL, fullLen) * factor; + } + } - if (mw[i] < 1e-8) { - // fprintf(stderr, "Warning: %dth reference sequence is masked for almost all positions!\n", i); - mw[i] = 0.0; - } - } + mw[i] = 1.0 - value; + + if (mw[i] < 1e-8) { + // fprintf(stderr, "Warning: %dth reference sequence is masked for almost all positions!\n", i); + mw[i] = 0.0; + } + } } #endif /* SINGLEMODEL_H_ */