login
a(n) = 2*A000124(A003056(n-1)) if A002262(n-1)=0, otherwise a(n-1)+1.
2

%I #2 Mar 31 2012 13:21:19

%S 2,4,5,8,9,10,14,15,16,17,22,23,24,25,26,32,33,34,35,36,37,44,45,46,

%T 47,48,49,50,58,59,60,61,62,63,64,65,74,75,76,77,78,79,80,81,82,92,93,

%U 94,95,96,97,98,99,100,101,112,113,114,115,116,117,118,119,120,121

%N a(n) = 2*A000124(A003056(n-1)) if A002262(n-1)=0, otherwise a(n-1)+1.

%o (MIT Scheme:) (define (A166021 n) (if (zero? (A002262 (-1+ n))) (* 2 (A000124 (A003056 (-1+ n)))) (1+ (A166021 (-1+ n)))))

%Y Complement of A136272.

%K nonn,tabl,easy

%O 1,1

%A _Antti Karttunen_, Oct 05 2009