A146318 Prime subtrahends of nearest cubes producing prime differences

3, 5, 41, 47, 53, 59, 61, 127, 137, 149, 157, 163, 173, 179, 193, 197, 199, 211, 349, 373, 409, 433, 439, 499, 509, 727, 743, 761, 773, 809, 821, 827, 863, 887, 911, 929, 941, 947, 953, 971, 977, 983, 997, 1361, 1381, 1447, 1451, 1459, 1471, 1487, 1489, 1499

Offset

1,1

Comments

Terms in A146317 + A146318 produce a cube

Links

Table of n, a(n) for n=1..52.

Example

a(3)=41 because when the prime 23 is subtracted from the cube 64, the result is another prime, 41

Prog

(UBASIC) 10 'cu less pr are prime 20 N=1:O=1 30 A=3:S=sqrt(N) 40 B=N\A 50 if B*A=N then 120 60 A=A+2 70 if A<=S then 40 80 R=O^3:Q=R-N 90 if N<R and N=prmdiv(N) and Q=prmdiv(Q) then print R; N; Q:C=C+1:N=N+2:goto 30 100 if C=30 then stop 120 N=N+2:if N<R then 30:else O=O+1:goto 80

Crossrefs

A146315 A146316 A146317

Sequence in context: A077779 A176112 A215133 * A228968 A178545 A145912

Adjacent sequences: A146315 A146316 A146317 * A146319 A146320 A146321

Keyword

easy,nonn

Author

Enoch Haga, Oct 30 2008

Status

approved