NAME
Math::Business::ADX - Technical Analysis: ADX (wilder's DMI)
SYNOPSIS
use Math::Business::ADx;
my $adx = new Math::Business::ADX;
$adx->set_days(14);
# alternatively/equivilently
my $adx = new Math::Business::ADX(14);
# or to just get the recommended model ... (14)
my $adx = Math::Business::ADX->recommended;
my @data_points = (
[ 5, 3, 4 ], # high, low, close
[ 6, 4, 5 ],
[ 5, 4, 4.5 ],
);
# choose one:
$adx->insert( @data_points );
$adx->insert( $_ ) for @data_points;
my $adx = $adx->query; # ADX
my $pdi = $adx->query_pdi; # +DI
my $mdi = $adx->query_mdi; # -DI
# or
my ($pdi, $mdi, $adx) = $adx->query;
if( defined $adx ) {
print "ADX: $adi.\n";
} else {
print "ADX: n/a.\n";
}
SEE ALSO
ADX is an alternate name for DMI. This module is simply an alias for the DMI.
perl(1), Math::Business::DMI