login
A244733
Semiprimes sp such that sp plus its digit sum is a perfect square.
2
38, 86, 161, 614, 662, 998, 1145, 1355, 1829, 2189, 2483, 4607, 5027, 5315, 6377, 7199, 8258, 11435, 13214, 15611, 17933, 19574, 20153, 21305, 21878, 24014, 26867, 30599, 32738, 34199, 36077, 38387, 38777, 40778, 42422, 46211, 51509, 52874, 56618, 58541, 59987
OFFSET
1,1
LINKS
EXAMPLE
86 is in the sequence because 86 = 2* 43, which is semiprime. Also, 86 + (8 + 6) = 100 = 10^2.
614 is in the sequence because 614 = 2* 307, which is semiprime. Also, 614 + (6 + 1 + 4) = 625 = 25^2.
MATHEMATICA
Select[Range[50000], PrimeOmega[#] == 2 && IntegerQ[Sqrt[# + Apply[Plus, IntegerDigits[#]]]] &]
CROSSREFS
KEYWORD
nonn,base
AUTHOR
K. D. Bajpai, Jul 12 2014
STATUS
approved