Clair::Statistics::Distributions

DistBase


Package variablesGeneral documentationMethods

Package variablesTop
No package variables defined.

SynopsisTop
No synopsis!
DescriptionTop
No description!
MethodsTop
log10No descriptionCode
maxNo descriptionCode
minNo descriptionCode
newNo descriptionCode
precisionNo descriptionCode
precision_stringNo descriptionCode

Methods description


None available.

Methods code


log10descriptionprevnextTop
sub log10 {
  my $self = shift;
  my $n = shift;
  return log($n) / log(10);
}

maxdescriptionprevnextTop
sub max {
  my $self = shift;
  my $max = shift;
  my $next;
  while (@_) {
    $next = shift;
    $max = $next if ($next > $max);
  }
  return $max;
}

mindescriptionprevnextTop
sub min {
  my $self = shift;
  my $min = shift;
  my $next;
  while (@_) {
    $next = shift;
    $min = $next if ($next < $min);
  }
  return $min;
}

newdescriptionprevnextTop
sub new {
  my $class = shift;
  my $self = {};

  bless($self, $class);

  return $self;
}

precisiondescriptionprevnextTop
sub precision {
  my $self = shift;
  my ($x) = @_;
  return abs int($self->log10(abs $x) - SIGNIFICANT);
}

precision_stringdescriptionprevnextTop
sub precision_string {
  my $self = shift;
  my ($x) = @_;
  if ($x) {
    return sprintf "%." . $self->precision($x) . "f", $x;
  } else {
    return "0";
  }
}

General documentation


No general documentation available.