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 A385289 #15 Jun 25 2025 10:34:58 %S A385289 1,2,4,8,11,12,14,16,18,21,22,24,28,31,32,34,38,41,42,44,48,51,52,54, %T A385289 58,61,62,64,68,71,72,74,78,81,82,84,88,91,92,94,98,101,102,104,108, %U A385289 111,112,114,116,118,121,122,124,128,131,132,134,138,141,142,144,148 %N A385289 Numbers whose trailing digits form a power of 2. %H A385289 Stefano Spezia, <a href="/A385289/b385289.txt">Table of n, a(n) for n = 1..10000</a> %t A385289 Select[Range[150],Sum[Boole[IntegerQ[Log2[FromDigits[Drop[IntegerDigits[#],i]]]]],{i,0,IntegerLength[#]}]>0 &] %o A385289 (PARI) isp2(k) = k==1<<valuation(k, 2); \\ A209229 %o A385289 isok(k) = if (isp2(k), return(1)); for (i=1, oo, my(z=k % 10^i); if (z==k, return(0), if (z && isp2(z), return(1)))); return(0); \\ _Michel Marcus_, Jun 24 2025 %Y A385289 Union of A000079 and A384714. %Y A385289 Cf. A209229. %K A385289 nonn,base,easy %O A385289 1,2 %A A385289 _Stefano Spezia_, Jun 24 2025