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 A254867 #13 Jan 17 2023 11:25:05
%S A254867 1,2,4,22,66,96,106,144,180,222,324,378,466,492,604,742,760,778,784,
%T A254867 960,984,990,994,1050,1150,1162,1186,1248,1302,1308,1356,1360,1380,
%U A254867 1744,1830,1866,1870,1956,2052,2070,2112,2182,2212,2380,2470,2556,2586,2638,2676,2760,2766
%N A254867 Numbers n such that prime(n) + n and prime(n) + n^2 are prime.
%e A254867 a(4) = 22 = A064402(6): prime(22) = 79, 79 + {22, 22^2} = {101, 563} both prime.
%p A254867 A254867:=n->`if`(isprime(ithprime(n)+n) and isprime(ithprime(n)+n^2), n, NULL): seq(A254867(n), n=1..10^4); # _Wesley Ivan Hurt_, Jan 16 2017
%t A254867 Select[Range[1000], PrimeQ[Prime[#] + #] && PrimeQ[Prime[#] + #^2] &] (* _Alonso del Arte_, Feb 09 2015 *)
%t A254867 Select[Range[3000],AllTrue[Prime[#]+{#,#^2},PrimeQ]&] (* _Harvey P. Dale_, Jan 17 2023 *)
%Y A254867 Subsequence of A064402. Cf. A000040, A014688, A061067, A061068.
%K A254867 nonn
%O A254867 1,2
%A A254867 _Zak Seidov_, Feb 09 2015