cp's OEIS Frontend

A185698 Final prime adjoined in the smallest term of A019518 divisible by 67^n.

%I A185698 #22 May 01 2020 13:08:07
%S A185698 37,37,14123267,47321411,5664619381
%N A185698 Final prime adjoined in the smallest term of A019518 divisible by 67^n.
%C A185698 Associated with A019518(i) at i = 12, 12, 917579, 2849864, ...
%e A185698 23571113171923293137 is divisible by 67^2.
%o A185698 (Python)
%o A185698 from sympy import nextprime
%o A185698 def A185698(n):
%o A185698     p, k, m = 2, 67**n, 10
%o A185698     q, m2 = p % k, m % k
%o A185698     while True:
%o A185698         p = nextprime(p)
%o A185698         while p >= m:
%o A185698             m *= 10
%o A185698             m2 = m % k
%o A185698         q = (q*m2 + p) % k
%o A185698         if q == 0:
%o A185698             return p # _Chai Wah Wu_, May 01 2020
%Y A185698 Cf. A019518, A185656, A185659, A185662, A185665, A185671, A185677.
%K A185698 nonn,base,more
%O A185698 1,1
%A A185698 _James G. Merickel_, Feb 05 2011
%E A185698 a(5) from _Chai Wah Wu_, May 01 2020