|
%I #11 Jul 13 2013 12:01:55
%S 2,15,30,32,34,35,36,38,40,42,44,46,48,55,75,95,115,135,155,175,198,
%T 228,251,254,257,258,260,263,266,269,272,275,278,288,318,348,378,408,
%U 438,468,490,493,496,498,499,502,505,508,511,514
%N Position of n-th 2 in A007376.
%C A007376(a(n)) = 2.
%H Reinhard Zumkeller, <a href="/A031289/b031289.txt">Table of n, a(n) for n = 1..10000</a>
%o (Haskell)
%o import Data.List (elemIndices)
%o a031289 n = a031289_list !! (n-1)
%o a031289_list = map (+ 1) $ elemIndices 2 a007376_list
%o -- _Reinhard Zumkeller_, Jul 28 2011
%Y Cf. A193428; A031287, A031288, A031290, A031291, A031292, A031293, A031294, A031295, A031296.
%K nonn,less,base
%O 1,1
%A _Clark Kimberling_
|
