cp's OEIS Frontend

A352346 Common terms between A061078 and A061077.

%I A352346 #22 Mar 22 2022 15:33:58
%S A352346 26,52,148,280,320,454,1150,1480,8000,41650,80300,165656,166088,
%T A352346 614900,2353700,2859460,28233200,66130400,68941640,85717240,107300320,
%U A352346 131507080,155478800,207666520,1426680920,1824596800,2468014900,2475648820,5342351060,5355218900,5857281500,8550475900,36025361120
%N A352346 Common terms between A061078 and A061077.
%C A352346 Smarandache's conjecture: there are infinitely many terms.
%C A352346 This is a subsequence of A061076.
%D A352346 A. Murthy, Smarandache friendly numbers and a few more sequences, Smarandache Notions Journal, Vol. 12, No. 1-2-3, Spring 2001. Page 267
%H A352346 Chai Wah Wu, <a href="/A352346/b352346.txt">Table of n, a(n) for n = 1..205</a>
%e A352346 26 is a term of this sequence, in fact:
%e A352346 26 = 1+3+5+7+9+1*1 (A061077(6)=26);
%e A352346 26 = 2+4+6+8+1*0+1*2+1*4 (A061078(7)=26).
%t A352346 Intersection[Accumulate[Times @@@ IntegerDigits[Range[2, 10000000, 2]]],
%t A352346 Accumulate[Times @@@ IntegerDigits[Range[1, 10000000, 2]]]]
%o A352346 (Python)
%o A352346 from math import prod
%o A352346 from itertools import islice
%o A352346 def A352346_gen(): # generator of terms
%o A352346     n1, m1, n2, m2 = 1, 1, 2, 2
%o A352346     while True:
%o A352346         if m1 == m2:
%o A352346             yield m1
%o A352346         k = 0
%o A352346         while k == 0:
%o A352346             n1 += 2
%o A352346             m1 += (k := prod(int(d) for d in str(n1)))
%o A352346         while m2 < m1:
%o A352346             n2 += 2
%o A352346             m2 += prod(int(d) for d in str(n2))
%o A352346 A352346_list = list(islice(A352346_gen(),20)) # _Chai Wah Wu_, Mar 21 2022
%Y A352346 Cf. A061076, A061077, A061078.
%K A352346 nonn,base
%O A352346 1,1
%A A352346 _Luca Onnis_, Mar 12 2022