A345072 Numbers k such that the sum of cubes of digits of both k and k-2 are primes.

113, 115, 124, 148, 166, 184, 214, 223, 238, 256, 265, 283, 289, 298, 328, 337, 355, 364, 418, 463, 487, 496, 526, 535, 553, 568, 577, 586, 616, 625, 634, 643, 658, 694, 757, 784, 814, 823, 829, 847, 856, 874, 889, 928, 946, 964, 997, 1013, 1015, 1024, 1048, 1066

Offset: 1

Author

Charles U. Lonappan, Jun 07 2021

Keywords

• base
• nonn

Comments

Numbers k such that k and k-2 appear in A225534.

Links

• Charles U. Lonappan, Numbers k such that the Sum of Cubes of Digits of both k and k-2 are Primes, IJRAR - International Journal of Research and Analytical Reviews, Volume 11, Issue 3 (2024), pp. 652-655.

Crossrefs

Cf. A225534.

Programs

Mathematica

q[n_] := PrimeQ[Plus @@ (IntegerDigits[n]^3)]; Select[Range[3, 1000], q[#-2] && q[#] &] (* Amiram Eldar, Jun 07 2021 *)