cp's OEIS Frontend

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.

A176894 Increase each digit in the binary representation of n by 2.

This page as a plain text file.
%I A176894 #6 Mar 30 2012 17:34:40
%S A176894 2,3,32,33,322,323,332,333,3222,3223,3232,3233,3322,3323,3332,3333,
%T A176894 32222,32223,32232,32233,32322,32323,32332,32333,33222,33223,33232,
%U A176894 33233,33322,33323,33332,33333,322222,322223,322232,322233,322322
%N A176894 Increase each digit in the binary representation of n by 2.
%C A176894 Or: add two times the repunit of matching length to A007088(n).
%F A176894 a(n) = A007088(n)+A002276(A070939(n)).
%e A176894 0+2, 1+2, 10+22, 11+22, 100+222, 101+222, 110+222, 111+222, 1000+2222, 1001+2222,...
%t A176894 Table[Sum[Table[((Reverse[IntegerDigits[n, 2]]) /. 0 -> 2) /. 1 -> 3, {n, 0, 50}][[n]][[m]]*10^( m - 1), {m, 1, Length[Table[((Reverse[IntegerDigits[n, 2]]) /. 0 -> 2) /. 1 -> 3, {n, 0, 50}][[n]]]}], {n, 1, 51}]
%t A176894 Table[FromDigits[2 + IntegerDigits[n, 2]], {n, 0, 100}]
%K A176894 nonn,base,easy
%O A176894 0,1
%A A176894 _Roger L. Bagula_, Apr 28 2010