OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
49 = 7*7; 49^3 - 1 = 2^4 * 3^2 * 19 * 43; 49^3 + 1 = 2 * 5^2 * 13 * 181.
MATHEMATICA
f[n_]:=SquareFreeQ[n]; lst={}; Do[If[ !f[n^3-1]&&!f[n^3+1]&&!f[n], AppendTo[lst, n]], {n, 2*6!}]; lst
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Apr 14 2010
STATUS
approved