login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Indices n where A079878(n) = n.
2

%I #16 Jul 19 2020 11:52:08

%S 1,2,8,32,46,392,12230,155942,659488,1025582,1047128,3437088,

%T 1449322158,1452777560,1691887144,4558298126,4840156480,39554086678,

%U 353617531486,608231808384,619986226720,969355365422

%N Indices n where A079878(n) = n.

%C a(23) > 4*10^12. - _Donovan Johnson_, Nov 21 2011

%F {n: A079878(n)=n}.

%e A079878(46)=46, which adds 46 to the sequence.

%o (Haskell)

%o import Data.List (elemIndices)

%o a200063 n = a200063_list !! (n-1)

%o a200063_list = map (+ 1) $ elemIndices 0 $ zipWith (-) [1..] a079878_list

%o -- _Reinhard Zumkeller_, Nov 13 2011

%Y Cf. A200064

%K nonn

%O 1,2

%A _R. J. Mathar_, Nov 13 2011

%E a(13)-a(22) from _Donovan Johnson_, Nov 21 2011