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 A045926 #19 Feb 09 2023 02:10:28 %S A045926 2,4,6,8,22,24,26,28,42,44,46,48,62,64,66,68,82,84,86,88,222,224,226, %T A045926 228,242,244,246,248,262,264,266,268,282,284,286,288,422,424,426,428, %U A045926 442,444,446,448,462,464,466,468,482,484,486,488,622,624,626,628,642 %N A045926 All digits even and nonzero. %H A045926 Reinhard Zumkeller, <a href="/A045926/b045926.txt">Table of n, a(n) for n = 1..10000</a> %H A045926 <a href="/index/Ar#10-automatic">Index entries for 10-automatic sequences</a>. %F A045926 a(n) = 2 * A084544(n). - _Reinhard Zumkeller_, Jan 01 2013 %o A045926 (Haskell) %o A045926 a045926 n = a045926_list !! (n-1) %o A045926 a045926_list = filter (all (`elem` "2468") . show) [2, 4..] %o A045926 -- _Reinhard Zumkeller_, Jan 01 2013 %o A045926 (Python) %o A045926 def A045926(n): %o A045926 m = (3*n+1).bit_length()-1>>1 %o A045926 return int(''.join((str(((3*n+1-(1<<(m<<1)))//(3<<((m-1-j)<<1))&3)+1) for j in range(m))))<<1 # _Chai Wah Wu_, Feb 08 2023 %Y A045926 Cf. A045927, A014261, A014263, A192370. %K A045926 nonn,easy,base %O A045926 1,1 %A A045926 _Felice Russo_ %E A045926 More terms from _Patrick De Geest_, Jun 15 1999