|
|
A104315
|
|
Numbers having in decimal representation at least one zero, but with no zero in their square.
|
|
8
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
909^2 = 826281, therefore 909 is a term.
|
|
PROG
|
(PARI) isok(n) = !vecmin(digits(n)) && vecmin(digits(n^2)); \\ Michel Marcus, Jan 03 2014
(Haskell)
a104315 n = a104315_list !! (n-1)
a104315_list = filter (\x -> a168046 x == 0 && a168046 (x ^ 2) == 1) [1..]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|