OFFSET
1,1
COMMENTS
All terms are odd. See comment in A308736. - Chai Wah Wu, Jun 24 2019
LINKS
Ray Chandler, Table of n, a(n) for n = 1..10000
EXAMPLE
3175 = 5 * 5 * 127,
3177 = 3 * 3 * 353,
3179 = 11 * 17 * 17.
MATHEMATICA
psx = Table[{0}, {5}]; nmax = 600000; n = 1; lst = {};
While[n < nmax, n++;
psx = RotateRight[psx];
psx[[1]] = Sort[Last /@ FactorInteger[n]];
If[Union[{psx[[1]], psx[[3]], psx[[5]]}] == {{1, 2}},
AppendTo[lst, n - 4]]; ];
lst
CROSSREFS
KEYWORD
nonn
AUTHOR
Ray Chandler, Jun 24 2019
STATUS
approved