Averages/Arithmetic mean: Difference between revisions

→‎{{header|RPL}}: remediated the dc-based version
imported>MaD70
(→‎{{header|APL}}: The problem with the display of Tally is for Chrome-based browsers, Firefox displays it correctly)
(→‎{{header|RPL}}: remediated the dc-based version)
Line 3,393:
 
=={{header|RPL}}==
This is based on the dc version above.
This is a simple rewrite of the dc version above. This works on an HP 48. "→" is a single right arrow character on the 48. Feel free to alter this code as necessary to work on RPL/2.
{{works with|HP|48G}}
≪ DUP 'N' STO →LIST ΣLIST N / 'N' PURGE ≫ '<span style="color:blue">AMEAN</span>' STO
or,by using the stack instead of a temporary variable:
≪ →LIST ΣLIST LASTARG SIZE / ≫ '<span style="color:blue">AMEAN</span>' STO
 
CLEAR 1 2 3 5 7 DEPTH <span style="color:blue">AMEAN</span>
<syntaxhighlight lang="rpl/2">1 2 3 5 7
AMEAN
<< CLEAR DEPTH DUP 'N' STO →LIST ΣLIST N / >>
3.6</syntaxhighlight>
 
===Hard-working approach===
1,150

edits