login
A038855
Numbers that are divisible by 7 and are differences between two cubes in at least one way.
1
7, 56, 63, 91, 98, 189, 217, 448, 469, 504, 511, 602, 665, 721, 728, 784, 819, 875, 973, 1141, 1197, 1267, 1323, 1330, 1512, 1519, 1603, 1701, 1736, 1946, 1981, 2044, 2072, 2107, 2170, 2401, 2457, 2611, 2646, 2716, 2765, 2863, 3087, 3185, 3311, 3367
OFFSET
1,1
PROG
(PARI) v=vector(3367); for(i=1, 33, for(j=i+1, 34, d=j^3-i^3; if(d<=3367, v[d]++, next(2)))); forstep(n=7, 3367, 7, if(v[n]>0, print1(n ", "))) \\ Donovan Johnson, Dec 31 2013
CROSSREFS
Sequence in context: A009521 A116120 A056719 * A097254 A043911 A044526
KEYWORD
nonn
AUTHOR
EXTENSIONS
2014 changed to 2044 by Donovan Johnson, Dec 31 2013
STATUS
approved