A144407 A058529(n+1)^2.

49, 289, 529, 961, 1681, 2209, 2401, 5041, 5329, 6241, 7921, 9409, 10609, 12769, 14161, 16129, 18769, 22801, 25921, 27889, 36481, 37249, 39601, 47089, 49729, 54289, 57121, 58081, 66049, 69169, 73441, 78961, 82369, 83521, 96721, 97969

Offset: 1

Author

Paul Curtz, Sep 30 2008

Keywords

• nonn

Comments

The last digit is either 1 or 9 .

Links

• Ray Chandler, Table of n, a(n) for n = 1..10000
• M. de Frenicle, Methode pour trouver la solutions des problemes par les exclusions, in: Divers ouvrages des mathematiques et de physique par messieurs de l'academie royale des sciences, (1693) pp 1-44.

Crossrefs

Cf. A058529, A198437.

Programs

Mathematica

Select[Range[500], Union[Abs[Mod[FactorInteger[#][[All, 1]], 8, -1]]] == {1} &]^2 // Rest (* Jean-François Alcover, Sep 21 2015, after T. D. Noe *)