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.

A176773 Smallest power of 14 whose decimal expansion contains n.

This page as a plain text file.
%I A176773 #12 Apr 03 2024 10:06:40
%S A176773 105413504,1,2744,38416,14,537824,196,2744,38416,196,105413504,
%T A176773 11112006825558016,56693912375296,105413504,14,155568095557812224,
%U A176773 38416,2177953337809371136,5976303958948914397184,196,20661046784,2177953337809371136
%N A176773 Smallest power of 14 whose decimal expansion contains n.
%C A176773 This is to 14 as A176763 is to 3 and as A030001 is to 2.
%H A176773 Paolo Xausa, <a href="/A176773/b176773.txt">Table of n, a(n) for n = 0..10000</a>
%F A176773 a(n) = MIN{A001023(i) such that n in decimal representation is a substring of A001023(i)}.
%e A176773 a(1) = 1 because 14^0 = 1 has "1" as a substring (not a proper substring, though).
%e A176773 a(2) = 2744 because 14^3 = 2744 has "2" as a substring.
%e A176773 a(3) = 38416 because 14^4 = 38416 has "3" as a substring.
%t A176773 A176773[n_] := Block[{k = -1}, While[StringFreeQ[IntegerString[14^++k], IntegerString[n]]]; 14^k]; Array[A176773, 50, 0] (* _Paolo Xausa_, Apr 03 2024 *)
%Y A176773 Cf. A001023, A030001, A176763, A176764-A176773.
%K A176773 base,easy,nonn
%O A176773 0,1
%A A176773 _Jonathan Vos Post_, Apr 25 2010
%E A176773 More terms from _Sean A. Irvine_ and _Jon E. Schoenfield_, May 05 2010
%E A176773 a(0) prepended by _Paolo Xausa_, Apr 03 2024