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 A259187 #10 May 25 2020 11:54:05 %S A259187 2,3,5,7,13,17,19,23,29,31,37,43,53,59,61,71,73,79,89,137,179,193,269, %T A259187 281,367,397,463,487,509,571,593,647,709,829,839,1307,1873,2069,2731, %U A259187 2801,3041,4157,4967,4987,6043,7549,7621,8623,21397 %N A259187 Primes p such that both p and p^2 are distinct-digit numbers. %C A259187 Corresponding squares are 4, 9, 25, 49, 169, 289, 361, 529, 841, 961, 1369, 1849, 2809, 3481, 3721, 5041, 5329, 6241, 7921, 18769, 32041, 37249, 72361, 78961, 134689, 157609, 214369, 237169, 259081, 326041, 351649, 418609, 502681, 687241, 703921, 1708249, 3508129, 4280761, 7458361, 7845601, 9247681, 17280649, 24671089, 24870169, 36517849, 56987401, 58079641, 74356129, 457831609 (subsequence of A078255). %t A259187 Select[Prime[Range[2500]],Max[DigitCount[#]]<2&&Max[DigitCount[#^2]]<2&] (* _Harvey P. Dale_, May 25 2020 *) %Y A259187 Subsequence of A029743 and of A119509. Cf. A078255. %K A259187 base,nonn,fini,full %O A259187 1,1 %A A259187 _Zak Seidov_, Jun 20 2015