login
A246693
Integers of the form A000129(k)/k.
2
1, 1, 3, 51, 1155, 29427, 22639155, 19594173939, 591666769155, 17395890501991155, 545562959212245745155, 17374763192966689655283, 17822632594268121083311155, 98871007862168357169507809155, 20542323580569158999838073680199155
OFFSET
1,3
EXAMPLE
A000129(4)/4 = 12/4 = 3.
MATHEMATICA
z = 1000; t = LinearRecurrence[{2, 1}, {1, 2}, z]; (* A000129 *)
Select[Range[1, z], IntegerQ[t[[#]]/#] &] (* A246692 *)
Table[t[[u[[n]]]]/u[[n]], {n, 1, 17}] (* A246693 *)
CROSSREFS
Sequence in context: A307369 A126685 A355797 * A187666 A377491 A377493
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Sep 01 2014
STATUS
approved