• NAME
• SYNOPSIS
• AUTHOR
• SEE ALSO

NAME

Math::Business::EMA - Perl extension for calculating EMAs

SYNOPSIS

  use Math::Business::EMA;

  my $ema = new Math::Business::EMA;

  set_days $ema 3;

  my @closing_values = qw(
      3 4 4 5 6 5 6 5 5 5 5 
      6 6 6 6 7 7 7 8 8 8 8 
  );

  foreach(@closing_values) {
      $ema->insert( $_ );
      if( defined(my $q = $ema->query) ) {
          # The first entry is the value of the simple 
          # moving average
          print "EMA value: $q.\n";  
      } else {
          # this is undefined until there's at least
          # $days worth of data...
          print "EMA value: n/a.\n";
      }
  }

  # to avoid recalculating huge lists when 
  # you add a few new values on the end

  $ema->start_with( $the_last_calculated_value );

  # then continue with a foreach over the newly
  # inserted values

  # For short, you can now skip the set_days() by suppling the setting to new():

  my $longer_ema = new Math::Business::EMA(10);

AUTHOR

Jettero Heller jettero@cpan.org

http://www.voltar.org

SEE ALSO

perl(1), Math::Business::EMA(3).