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.

A110815 Least n-digit number m whose square contains only digits not appearing in m.

This page as a plain text file.
%I A110815 #18 Feb 17 2021 11:38:36
%S A110815 2,17,144,1447,14144,141494,1414414,14144134,141431114,1414411113,
%T A110815 14143143413,141431113114,1414311131114,14143111141813,
%U A110815 141431113114113,1414311344113314,14143111141141113,141431113114331413
%N A110815 Least n-digit number m whose square contains only digits not appearing in m.
%C A110815 floor(sqrt(2)*10^(n-1)) < a(n). - _Robert G. Wilson v_, Oct 04 2005
%t A110815 f[n_] := Block[{k = Ceiling[10^n*(1/9 + .03032)]}, While[ Intersection[ IntegerDigits[k], IntegerDigits[k^2]] != {}, k++ ]; k]; Table[ f[n], {n, 18}] (* _Robert G. Wilson v_ *)
%o A110815 (Python)
%o A110815 from math import isqrt
%o A110815 def a(n):
%o A110815   m = isqrt(int('2'+'0'*(2*n-2)))
%o A110815   while set(str(m*m)) & set(str(m)) != set(): m += 1
%o A110815   return m
%o A110815 print([a(n) for n in range(1, 12)]) # _Michael S. Branicky_, Feb 17 2021
%Y A110815 Cf. A110816 (corresponding squares), A112321. Subsequence of A029783.
%K A110815 nonn,base
%O A110815 1,1
%A A110815 _Lekraj Beedassy_, Aug 17 2005
%E A110815 a(3) to a(6) corrected, a(7) to a(13) from _Klaus Brockhaus_, Aug 31 2005; revised Sep 09 2005
%E A110815 a(14)-a(18) from _Robert G. Wilson v_, Oct 04 2005