This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A074460 #10 Jul 22 2025 04:19:16 %S A074460 19,307,349,491,739,919,1013,1061,1277,1667,1747,2357,2683,3259,3581, %T A074460 3797,3943,4013,4597,4877,4987,5051,5741,6067,7757,9349,9413,9739, %U A074460 9851,9923,9949,10133,10243,10949,11093,11149,12619,12941,12979,13879,14051 %N A074460 Primes which are sandwiched between two numbers having the same unordered canonical form. %H A074460 Amiram Eldar, <a href="/A074460/b074460.txt">Table of n, a(n) for n = 1..10000</a> %t A074460 f[n_] := Flatten[Table[{ # [[2]]}] & /@ FactorInteger[n]]; Prime[ Select[ Range[1700], Sort[ f[ Prime[ # ] - 1]] == Sort[ f[ Prime[ # ] + 1]] & ]] %Y A074460 Cf. A074497, A074498, A061715. %Y A074460 Subsequence of A067889. %K A074460 easy,nonn %O A074460 1,1 %A A074460 _Robert G. Wilson v_, Aug 22 2002