20.07.2013 Views

Raport final cercetare 2007 - Lorentz JÄNTSCHI

Raport final cercetare 2007 - Lorentz JÄNTSCHI

Raport final cercetare 2007 - Lorentz JÄNTSCHI

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

<strong>Lorentz</strong> <strong>JÄNTSCHI</strong> (principal investigator) & Sorana D. BOLBOACĂ (co-investigator)<br />

$v[11]=pow(abs($prd),1/$nr_fprop);//geometric mean property for valid<br />

fragments - without sign<br />

else<br />

$v[11]=1;<br />

$af[11]="G".$na_fprop.$metric[$tip_x];<br />

$v[12]=pow(abs($prd),1/$nr_frags);//geometric mean property fragments -<br />

without sign<br />

$af[12]="g".$na_fprop.$metric[$tip_x];<br />

$v[13]=pow(abs($prd),1/$nr_at);//geometric mean property fragments - without<br />

sign<br />

$af[13]="F".$na_fprop.$metric[$tip_x];<br />

$v[14]=pow(abs($prd),1/$nr_bo);//geometric mean property fragments - without<br />

sign<br />

$af[14]="f".$na_fprop.$metric[$tip_x];<br />

if($isu)<br />

$v[15]=$nr_fprop/$isu;//harmonic mean property for valid fragments<br />

else<br />

$v[15]=(float)"INF";<br />

$af[15]="H".$na_fprop.$metric[$tip_x];<br />

if($isu)<br />

$v[16]=$nr_frags/$isu;//harmonic mean property for valid fragments<br />

else<br />

$v[16]=(float)"INF";<br />

$af[16]="h".$na_fprop.$metric[$tip_x];<br />

if($isu)<br />

$v[17]=$nr_at/$isu;//harmonic mean property for valid fragments<br />

else<br />

$v[17]=(float)"INF";<br />

$af[17]="I".$na_fprop.$metric[$tip_x];<br />

if($isu)<br />

$v[18]=$nr_bo/$isu;//harmonic mean property for valid fragments<br />

else<br />

$v[18]=(float)"INF";<br />

$af[18]="i".$na_fprop.$metric[$tip_x];<br />

}<br />

$ret = $af[$smo]." = ".$v[$smo]."\r\n";<br />

if($lty==0){<br />

$ret .= "I".$af[$smo]." = ".$v[$smo]."\r\n";<br />

}<br />

if($lty==1){<br />

$ret .= "i".$af[$smo]." = ".(1/$v[$smo])."\r\n";<br />

}<br />

if($lty==2){<br />

$ret .= "A".$af[$smo]." = ".(abs($v[$smo]))."\r\n";<br />

}<br />

if($lty==3){<br />

$ret .= "a".$af[$smo]." = ".(abs(1/$v[$smo]))."\r\n";<br />

}<br />

if($lty==4){<br />

$ret .= "L".$af[$smo]." = ".(log(abs($v[$smo])))."\r\n";<br />

}<br />

if($lty==5){<br />

$ret .= "l".$af[$smo]." = ".(log($v[$smo]))."\r\n";<br />

}<br />

return $ret;<br />

}<br />

?>

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!