A099067
Numbers n such that n=P(d_1*d_2*...*d_k) + P(d_1+d_2+...+d_k) where d_1 d_2 ... d_k is the decimal expansion of n and P(i) is the i-th prime.
Original entry on oeis.org
82, 92, 194, 149868
Offset: 1
149868 is in the sequence because 149868=149717+151=P(1*4*9*8*6*8)+P(1+4+9+8+6+8).
-
Do[h=IntegerDigits[n];l=Length[h];If[ !MemberQ[h, 0]&& n==Prime[Product[h[[k]], {k, l}]]+Prime[Sum[h[[k]], {k, l}]], Print[n]], {n, 25000000}]
A099068
Numbers n such that n=P(d_1)*P(d_2)*...*P(d_k)+(P(d_1)+P(d_2)+...+P(d_k)) where d_1 d_2 ... d_k is the decimal expansion of n and P(i) is the i-th prime.
Original entry on oeis.org
23, 119, 428, 918, 1637682, 652827658771
Offset: 1
1637682 is in the sequence because 1637682=
P(1)*P(6)*P(3)*P(7)*P(6)*P(8)*P(2)+(P(1)+P(6)+P(3)+P(7)+P(6)+P(8)+P(2)).
- C. Rivera, Puzzle 279The Prime Puzzles & Problems connection.
-
Do[h=IntegerDigits[n];l=Length[h];If[ !MemberQ[h, 0]&&n==Product[Prime[h[[k]]], {k, l}]+Sum[Prime[h[[k]]], {k, l}], Print[n]], {n, 15000000}]
Showing 1-2 of 2 results.
Comments