A104315 Numbers having in decimal representation at least one zero, but with no zero in their square.

106, 107, 108, 109, 204, 206, 207, 208, 209, 304, 306, 307, 308, 309, 404, 406, 407, 408, 409, 604, 606, 607, 608, 704, 706, 707, 804, 806, 807, 808, 809, 904, 907, 908, 909, 1056, 1057, 1058, 1059, 1061, 1062, 1063, 1065, 1066, 1067, 1069, 1072, 1073

Offset: 1

Author

Reinhard Zumkeller, Mar 01 2005

Keywords

• nonn
• base

Comments

A104316(n) = a(n)^2.

Examples

			909^2 = 826281, therefore 909 is a term.
		

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A104317, A052041.

Programs

Haskell

a104315 n = a104315_list !! (n-1)
a104315_list = filter (\x -> a168046 x == 0 && a168046 (x ^ 2) == 1) [1..]
-- Reinhard Zumkeller, Jan 03 2014

PARI

isok(n) = !vecmin(digits(n)) && vecmin(digits(n^2)); \\ Michel Marcus, Jan 03 2014

Formula

(1 - A168046(a(n))) * A168046(A000290(a(n))) = 1. - Reinhard Zumkeller, Jan 03 2014