Munchausen numbers: Difference between revisions

jq
(Added a solution for Factor)
(jq)
Line 887:
{{Out}}
<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}}==
2,502

edits