A104304 Primes which are the reverse concatenation of five consecutive square numbers.
1876918496182251795617689, 3648136100357213534434969, 297025295936294849293764292681, 466489465124463761462400461041, 16770251674436167184916692641666681, 17556251752976175032917476841745041, 30660013062500305900130555043052009, 31506253147076314352931399843136441
Offset: 1
Examples
The first term is 1876918496182251795617689 which is a prime and is the reverse concatenation of 17689, 17956, 18225, 18496 and 18769 which are five consecutive square numbers.
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
cat[s_] := FromDigits[Flatten[IntegerDigits[s]]]; Select[cat /@ Reverse /@ Partition[Range[3000]^2, 5, 1], PrimeQ] (* Amiram Eldar, Jul 15 2025 *)
Extensions
More terms from Amiram Eldar, Jul 15 2025