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, 1587474651, 1865775531, 2223331131, 2735465781, 2758657521, 2955787311, 3437557341, 3558772551, 3575611851, 3825477561, 4339513471, 5216934211, 5228577831, 5773583721, 7358739151, 7547751831, 7733285751, 9553837341, 11745456771, 11765169751, 12646455871
Offset: 1
Programs
-
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, ", "));););
Extensions
a(20)-a(22) from Jinyuan Wang, Mar 05 2025