|
|
A245362
|
|
Semiprimes whose reversal + 1 is a square.
|
|
1
|
|
|
51, 323, 341, 422, 591, 993, 998, 4227, 4265, 5129, 5534, 5921, 5937, 8049, 8657, 8801, 9953, 32133, 32282, 32471, 32597, 32817, 34091, 34379, 36611, 36863, 38937, 42011, 42243, 42605, 53211, 53673, 55745, 57167, 57903, 59543, 82151, 86354, 86781, 88217, 88433
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Similar sequence for primes at A167217.
|
|
LINKS
|
|
|
EXAMPLE
|
341 is in the sequence because 341 = 11 * 31, which is semiprime, and reversal(341) + 1 = 143 + 1 = 144 = 12^2.
591 is in the sequence because 591 = 3 * 197, which is semiprime, and reversal(591) + 1 = 195 + 1 = 196 = 14^2.
|
|
MATHEMATICA
|
Select[Range[10^5], PrimeOmega[#] == 2 && IntegerQ[Sqrt[FromDigits[Reverse[IntegerDigits[#]]] + 1]] &]
|
|
PROG
|
(PARI)
revint(n) = eval(concat(Vecrev(Str(n))))
select(n->bigomega(n)==2 && issquare(revint(n)+1), vector(100000, n, n)) \\ Colin Barker, Jul 20 2014
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|