Changeset 2922 in Sophya


Ignore:
Timestamp:
Mar 27, 2006, 6:57:19 PM (20 years ago)
Author:
ansari
Message:

Ajout commande expmeansig pour TD/TP SurvEnv - Reza 27/3/2006

Location:
trunk/SophyaPI/PIext
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/SophyaPI/PIext/basexecut.cc

    r2792 r2922  
    785785    }
    786786  srvo->PrepareNTExpressionCFile(tokens[0],tokens[1], tokens[2]);
     787  }
     788
     789else if (kw == "expmeansig" ) {
     790  if (tokens.size() < 2) {
     791    cout << "Usage: expmeansig nameobj expx [expcut loop_par]" << endl;
     792    return(0);
     793    }
     794  while (tokens.size() < 4) tokens.push_back("");
     795  string dummy = "";
     796  cout << " expmeansig: computing mean/sigma + min/max for " << tokens[0]
     797       << "." << tokens[1] << endl;
     798  srvo->ExpressionToVector(tokens[0],tokens[1],tokens[2],dummy,dummy,tokens[3]);
    787799  }
    788800
     
    12101222mpiac->RegisterCommand(kw, usage, this, "Expr. Plotting");
    12111223
     1224kw = "expmeansig";
     1225usage = "Computes Mean/Sigma (+Min/Max) for an expression X=f(Object)";
     1226usage += "\n Usage: expmeansig nameobj f_X() [Cut() loop_param]";
     1227usage += "\n  Related commands: exptovec ntloop fillnt ObjectExpressions ...";
     1228mpiac->RegisterCommand(kw, usage, this, "Expr. Plotting");
     1229
    12121230kw = "exptovec";
    12131231usage = "Creates and Fills a Vector with X=f(Object)";
     
    12151233usage += "\n  Related commands: ntloop fillnt ObjectExpressions ...";
    12161234mpiac->RegisterCommand(kw, usage, this, "Expr. Plotting");
     1235
    12171236kw = "fillgd1";
    12181237usage = "Creates and Fills a GeneralFitData with (X=f(Object), Y=g(...), ErrY=h(...))";
  • trunk/SophyaPI/PIext/servnobjm.cc

    r2833 r2922  
    2626#include "tmatrix.h"
    2727#include "tvector.h"
     28#include "matharr.h"
    2829#include "pitvmaad.h"
    2930#endif
     
    817818  }
    818819delete nt;
    819 MyObjMgr()->AddObj(vec, nomvec);
    820 MyObjMgr()->DisplayObj(nomvec, dopt);
     820if (nomvec.size() > 0) {
     821  MyObjMgr()->AddObj(vec, nomvec);
     822  MyObjMgr()->DisplayObj(nomvec, dopt);
     823}
     824else {
     825// On calcule et on affiche mean/sigma + min/max
     826  double min, max, mean, sigma;
     827  vec->MinMax(min, max);
     828  MathArray<r_8> ma;
     829  ma.MeanSigma(*vec, mean, sigma);
     830  cout << " Mean= " << mean << "  Sigma= " << sigma
     831       << "  Min= " << min << " Max= " << max << endl;
     832  delete vec;
     833}
    821834return; 
    822835}
Note: See TracChangeset for help on using the changeset viewer.