A015889 Numbers k that divide 4^k + 4.

1, 2, 4, 10, 20, 52, 130, 370, 1066, 1090, 2626, 4580, 7540, 9140, 21268, 21682, 24634, 26596, 29380, 38740, 40330, 65026, 146810, 152164, 154180, 159172, 211492, 271426, 290116, 330706, 432730, 567988, 575956, 710788, 782090

Offset: 1

Author

Robert G. Wilson v

Keywords

• nonn

Links

• Giovanni Resta, Table of n, a(n) for n = 1..750

Crossrefs

Cf. A006517, A015888, A015891, A015892, A015893, A015897, A015898, A015902, A015903, A015904, A015905, A015906.

Programs

Mathematica

Select[Range[800000],Divisible[4^#+4,#]&] (* Harvey P. Dale, Jun 06 2012 *)

Extensions

Corrected (a(2) = 2 inserted) by Harvey P. Dale, Jun 06 2012