OFFSET
1,1
COMMENTS
See A103182 for further information.
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..10563 (all terms less than 2*sqrt(10^151))
Michael De Vlieger, Plot of digits of a(n), n = 1..2000, showing zeros in white and nonzero digits in black, 10X horizontal exaggeration.
MATHEMATICA
nn = 8; f[n_] := Transpose@ {Reverse@ #[[1 ;; Ceiling[Length[#]/2]]], #[[-Ceiling[Length[#]/2] ;; -1]]} &@ Divisors[10^n]; TakeWhile[Sort@ Flatten@ Table[Select[Total /@ f[k], ! Divisible[#, 10] &], {k, 0, nn}], # < 2 Sqrt[10^(nn + 1)] &]] (* Michael De Vlieger, Nov 29 2022 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Eric Angelini, Mar 18 2005
EXTENSIONS
More terms from Kerry Mitchell, Mar 09 2005
Name edited by Peter Munn, Nov 27 2022
STATUS
approved