cp's OEIS Frontend

A185695 Final prime adjoined in the smallest term of A019518 divisible by 61^n.

%I A185695 #14 May 02 2020 07:02:02
%S A185695 23,41719,308537,270907253,28643801327
%N A185695 Final prime adjoined in the smallest term of A019518 divisible by 61^n.
%C A185695 Associated with A019518(i) at i = 9, 4363, 26688, 14758114, ...
%o A185695 (Python)
%o A185695 from sympy import nextprime
%o A185695 def A185695(n):
%o A185695     p, k, m = 2, 61**n, 10
%o A185695     q, m2 = p % k, m % k
%o A185695     while True:
%o A185695         p = nextprime(p)
%o A185695         while p >= m:
%o A185695             m *= 10
%o A185695             m2 = m % k
%o A185695         q = (q*m2 + p) % k
%o A185695         if q == 0:
%o A185695             return p # _Chai Wah Wu_, May 01 2020
%Y A185695 Cf. A019518, A185656, A185659, A185662, A185665, A185671, A185677.
%K A185695 nonn,base,more
%O A185695 1,1
%A A185695 _James G. Merickel_, Feb 05 2011
%E A185695 a(5) from _Chai Wah Wu_, May 01 2020