login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Numbers k such that k | A000129(k).
20

%I #20 Mar 31 2021 03:54:14

%S 1,2,4,8,12,16,24,32,36,48,60,64,72,84,96,108,120,128,132,136,144,168,

%T 180,192,216,240,252,256,264,272,288,300,324,336,360,384,396,408,420,

%U 432,480,504,512,528,540,544,576,588,600,648,660,672,720,756,768

%N Numbers k such that k | A000129(k).

%C These are the numbers k such that mean of the k-th row of the Delannoy triangle at A027926 is an integer. All such k except 0 and 1 are multiples of 4.

%C Is A181824 a subsequence? The first 31 terms appear in this sequence. - _Jaycob Coleman_, Mar 08 2015 [The first 323 terms of A181824 appear in this sequence. - _Amiram Eldar_, Mar 31 2021]

%H Amiram Eldar, <a href="/A246692/b246692.txt">Table of n, a(n) for n = 1..10000</a>

%e Row 4 of the Delannoy triangle is (1,5,5,1), with sum 12 = A000129(4) divisible by 4.

%t z = 1000; t = LinearRecurrence[{2, 1}, {1, 2}, z]; (* A000129 *)

%t Select[Range[1, z], IntegerQ[t[[#]]/#] &] (* A246692 *)

%t Table[t[[u[[n]]]]/u[[n]], {n, 1, 17}] (* A246693 *)

%Y Cf. A246693, A000129, A027926.

%Y Cf. A181824.

%K nonn,easy

%O 1,2

%A _Clark Kimberling_, Sep 01 2014