login
Final prime adjoined in the smallest term of A019518 divisible by 73^n.
5

%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