Munchausen numbers: Difference between revisions

m
m (→‎{{header|Factor}}: whitespace and style tweaks)
Line 716:
dup 1 digit-groups dup [ ^ ] 2map sum = ;
 
5000 [1,b] [ munchausen? ] filter .</lang>
 
MAIN: main</lang>
{{out}}
<pre>
1,827

edits