login
A381697
Zeroless integers of the form 10*k+1 such that the 9 integers 10*k+1..10*k+9 all belong to A381631.
1
1, 1587474651, 1865775531, 2223331131, 2735465781, 2758657521, 2955787311, 3437557341, 3558772551, 3575611851, 3825477561, 4339513471, 5216934211, 5228577831, 5773583721, 7358739151, 7547751831, 7733285751, 9553837341, 11745456771, 11765169751, 12646455871
OFFSET
1,2
PROG
(PARI) isOne(k) = my(d=digits(k)); ((k*vecprod(d)) % vecsum(d)) == 0; \\ A381631
chk(nn) = for (i=0, nn, my(x=10*i+1, d=digits(x)); if (vecmin(d), my(ok=1); for (j=0, 8, if (!isOne(x+j), ok=0; break); ); if (ok, print1(x, ", ")); ); );
CROSSREFS
Cf. A052382 (zeroless integers), A381631.
Sequence in context: A384535 A166383 A227444 * A384933 A329463 A246250
KEYWORD
nonn,base
AUTHOR
Michel Marcus, Mar 04 2025
EXTENSIONS
a(20)-a(22) from Jinyuan Wang, Mar 05 2025
STATUS
approved