This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A283483 #11 Mar 19 2017 19:39:36 %S A283483 0,1,4,5,13,14,17,18,40,41,44,45,53,54,57,58,121,122,125,126,134,135, %T A283483 138,139,161,162,165,166,174,175,178,179,364,365,368,369,377,378,381, %U A283483 382,404,405,408,409,417,418,421,422,485,486,489,490,498,499,502,503,525,526,529,530,538,539,542,543,1093,1094,1097,1098,1106,1107,1110,1111 %N A283483 Sums of distinct nonzero terms of A003462: a(n) = Sum_{k>=0} A030308(n,k)*A003462(1+k). %C A283483 Indexing starts from zero, with a(0) = 0. %F A283483 a(n) = Sum_{i=0..A070939(n)} A030308(n,i)*A003462(1+i). %F A283483 a(n) = A090880(A283477(n)). %F A283483 Other identities. For all n >= 0: %F A283483 a(2^n) = A003462(n+1). %o A283483 (PARI) %o A283483 A003462(n) = (3^n-1)/2; %o A283483 A030308(n,k) = bittest(n,k); %o A283483 A283483(n) = sum(i=0,(#binary(n)-1),A030308(n,i)*A003462(1+i)); %o A283483 (Scheme) (define (A283483 n) (A090880 (A283477 n))) %Y A283483 Cf. A000244, A003462, A005187, A030308, A070939, A090880, A283477. %K A283483 nonn %O A283483 0,3 %A A283483 _Antti Karttunen_, Mar 19 2017