cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A319599 Numbers k such that k mod (2, 3, 4, ... , i+1) = (d_i, d_i-1, ..., d_1), where d_1, d_2, ..., d_i are the digits of k, with MSD(k) = d_1 and LSD(k) = d_i.

This page as a plain text file.
%I A319599 #15 May 10 2021 09:59:34
%S A319599 0,1,10,20,1101,1121,11311,31101,40210,340210,4620020,5431101,7211311,
%T A319599 12040210,24120020,151651121,165631101,1135531101,8084220020,
%U A319599 9117311311,894105331101
%N A319599 Numbers k such that k mod (2, 3, 4, ... , i+1) = (d_i, d_i-1, ..., d_1), where d_1, d_2, ..., d_i are the digits of k, with MSD(k) = d_1 and LSD(k) = d_i.
%e A319599 a(11) = 5431101 because:
%e A319599 5431101 mod 2 = 1, 5431101 mod 3 = 0, 5431101 mod 4 = 1,
%e A319599 5431101 mod 5 = 1, 5431101 mod 6 = 3, 5431101 mod 7 = 4,
%e A319599 5431101 mod 8 = 5.
%p A319599 P:=proc(q) local a,i,j,n,ok; print(0); print(1); for n from 1 to q do
%p A319599 for i from 0 to 1 do a:=10*n+i; ok:=1; for j from 1 to ilog10(a)+1 do
%p A319599 if (a mod 10)<>((10*n+i) mod (j+1)) then ok:=0; break; else
%p A319599 a:=trunc(a/10); fi; od; if ok=1 then print(10*n+i); break; fi;
%p A319599 od; od; end: P(10^12);
%Y A319599 Cf. A266181, A284815.
%K A319599 nonn,base,more
%O A319599 0,3
%A A319599 _Paolo P. Lava_, Sep 24 2018