Perfect numbers: Difference between revisions

m
(add lambdatalk code)
Line 2,268:
<syntaxhighlight lang="scheme">
 
{S.replace \s by space in
{S.map {lambda {:i} {if {js_perfect :i} then :i else}}
{S.serie 2 10000}}}
-> 6 28 496 8128 // 80ms
 
{script
LAMBDATALK.DICT["js_perfect"] = function() {
function js_perfect(n) {
var sum = 1, i, sqrt=Math.floor(Math.sqrt(n));
Line 2,279 ⟶ 2,286:
}
 
var args = arguments[0].trim();
{S.replace \s by space in
{S.map {lambda {:i}return {if {(js_perfect( :i}Number(args) )) ? then"true" :i else}}"false"
};
{S.serie 2 10000}}}
 
-> 6 28 496 8128 // 80ms
}
</syntaxhighlight>
 
99

edits