Math::Business::WMA - Technical Analysis: Weighted Moving Average
use Math::Business::WMA; my $avg = new Math::Business::WMA; $avg->set_days(8); 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 ); # choose one: $avg->insert( @closing_values ); $avg->insert( $_ ) for @closing_values; if( defined(my $q = $avg->query) ) { print "value: $q.\n"; } else { print "value: n/a.\n"; }
For short, you can skip the set_days() by suppling the setting to new():
my $longer_avg = new Math::Business::WMA(10);
Paul Miller <jettero@cpan.org>
<jettero@cpan.org>
I am using this software in my own projects... If you find bugs, please please please let me know. There is a mailing list with very light traffic that you might want to join: http://groups.google.com/group/stockmonkey/.
Copyright © 2013 Paul Miller
This is released under the Artistic License. See perlartistic.
perl(1), Math::Business::StockMonkey, Math::Business::StockMonkey::FAQ, Math::Business::StockMonkey::CookBook
http://www.alanhull.com.au/wma/wma.html
To install Math::Business::DMI, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Math::Business::DMI
CPAN shell
perl -MCPAN -e shell install Math::Business::DMI
For more information on module installation, please visit the detailed CPAN module installation guide.