|
|
last edited 7 years ago by KSmarts |
1 2 3 4 5 6 7 8 9 | ||
Editor: KSmarts
Time: 2017/10/28 16:45:45 GMT+0 |
||
Note: |
changed: - if j-i = 2*n then if j-i=2*n then
a : (Integer) -> Integer
a(n) == i:=2 repeat j:=nextPrime(i) if j-i=2*n then return i i:=j
for n in 1..20 repeat output(a(n))
Compiling function a with type Integer -> Integer 3 7 23 89 139 199 113 1831 523 887 1129 1669 2477 2971 4297 5591 1327 9551 30593 19333