|
%I #6 Jul 13 2013 12:04:29
%S 0,1,2,3,4,5,11,12,13,14,20,21,22,23,24,25,27,29,30,31,32,34,36,38,43,
%T 44,45,46,49,50,51,54,62,63,64,66,67,69,70,71,73,74,76,77,78,79,80,81,
%U 83,85,86,87,88,89,90,92,94,95,96,99,101,103,105,107,108
%N Where A214551(n) and A214551(n+2) are coprime.
%C A214323(a(n)) = 1.
%H Reinhard Zumkeller, <a href="/A214653/b214653.txt">Table of n, a(n) for n = 1..10000</a>
%o (Haskell)
%o import Data.List (elemIndices)
%o a214653 n = a214653_list !! (n-1)
%o a214653_list = elemIndices 1 a214323_list
%K nonn
%O 1,3
%A _Reinhard Zumkeller_, Jul 24 2012
|
