Aliquot sequence classifications: Difference between revisions
Content added Content deleted
(Added AppleScript.) |
m (→{{header|Phix}}: class -> classification (for better syntax colouring more than anything else)) |
||
Line 2,620: | Line 2,620: | ||
constant n = tagset(12)&{28, 496, 220, 1184, 12496, 1264460, 790, 909, 562, 1064, 1488, 15355717786080} |
constant n = tagset(12)&{28, 496, 220, 1184, 12496, 1264460, 790, 909, 562, 1064, 1488, 15355717786080} |
||
sequence class, dseq |
|||
for i=1 to length(n) do |
for i=1 to length(n) do |
||
{ |
{string classification, sequence dseq} = aliquot(n[i]) |
||
printf(1,"%14d => %15s, {%s}\n",{n[i], |
printf(1,"%14d => %15s, {%s}\n",{n[i],classification,flat_d(dseq)}) |
||
end for</lang> |
end for</lang> |
||
{{out}} |
{{out}} |