|
%I #10 May 01 2020 17:31:19
%S 593,23909,4851169,84821071,13231167673
%N Final prime adjoined in the smallest term of A019518 divisible by 73^n.
%C Associated with A019518(i) at i = 108, 2660, 338775, 4933945,...
%o (Python)
%o from sympy import nextprime
%o def A185704(n):
%o p, k, m = 2, 73**n, 10
%o q, m2 = p % k, m % k
%o while True:
%o p = nextprime(p)
%o while p >= m:
%o m *= 10
%o m2 = m % k
%o q = (q*m2 + p) % k
%o if q == 0:
%o return p # _Chai Wah Wu_, May 01 2020
%Y Cf. A185656, A185659, A185662, A185665, A185671, A185677, A185680.
%K nonn,base,more
%O 1,1
%A _James G. Merickel_, Feb 05 2011
%E a(5) from _Chai Wah Wu_, May 01 2020
|
