Munchausen numbers: Difference between revisions
Content added Content deleted
(Added a solution for Factor) |
(jq) |
||
Line 887: | Line 887: | ||
{{Out}} |
{{Out}} |
||
<lang JavaScript>[1, 3435]</lang> |
<lang JavaScript>[1, 3435]</lang> |
||
=={{header|jq}}== |
|||
{{works with|jq|1.5}} |
|||
<lang jq>def sigma( stream ): reduce stream as $x (0; . + $x ) ; |
|||
def ismunchausen: |
|||
def digits: tostring | split("")[] | tonumber; |
|||
. == sigma(digits | pow(.;.)); |
|||
# Munchausen numbers from 1 to 5000 inclusive: |
|||
range(1;5001) | select(ismunchausen)</lang> |
|||
{{out}} |
|||
<lang jq>1 |
|||
3435</lang> |
|||
=={{header|Julia}}== |
=={{header|Julia}}== |