login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A036688 Number of distinct n-digit suffixes of base 10 squares not containing digit 0. 2
5, 18, 119, 698, 5449, 41735, 359207, 3085197, 27434602, 243921771 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Table of n, a(n) for n=1..10.

Josiah H. Drummond, Problem 57, Amer. Math. Monthly, Vol. 5 (1898), p. 26; reprinted on p. 906 of Vol. 105 (1998).

EXAMPLE

Any square ends with one of [ 0 ], 1, 4, 5, 6, 9, so a(1) = 5.

a(3) = A000993(3) - a(2) - #{100, 104, 201, 204, 209, 304, 400, 401, 404, 409, 500, 504, 600, 601, 604, 609, 704, 801, 804, 809, 900, 904} = 159 - 18 - 22 = 119, cf. A122986. - Reinhard Zumkeller, Mar 21 2010

MATHEMATICA

(* A partly empirical script *) a[n_] := (Clear[qr]; qr[_] = False; For[k = 1, k <= 10^n/4, k++, m = PowerMod[k, 2, 10^n]; If[m > 10^(n-1) && FreeQ[IntegerDigits[m], 0], qr[m] = True]]; For[cnt = 0; k = 10^(n-1)+1, k <= 10^n-1, k++, If[qr[k], cnt++]]; cnt); a[1] = 5; Table[an = a[n]; Print["a(", n, ") = ", an]; an, {n, 1, 10}] (* Jean-Fran├žois Alcover, Jul 31 2015 *)

CROSSREFS

Cf. A036788.

Sequence in context: A332784 A302435 A332467 * A009348 A009365 A140296

Adjacent sequences:  A036685 A036686 A036687 * A036689 A036690 A036691

KEYWORD

base,nonn,nice

AUTHOR

R. K. Guy

EXTENSIONS

Explanation and more terms from David W. Wilson.

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified August 13 05:41 EDT 2020. Contains 336442 sequences. (Running on oeis4.)