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,2

Links

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

Mathematica

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

Crossrefs

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

Sequence in context: A265264 A026395 A247630 * A090246 A104442 A104434

Adjacent sequences: A015886 A015887 A015888 * A015890 A015891 A015892

Keyword

nonn

Author

Robert G. Wilson v

Extensions

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

Status

approved