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 A163442 #8 Dec 16 2017 12:47:05
%S A163442 181,1103,40471,143329,212419,266261,468493,14586401,20948491,
%T A163442 48894061,53298877,86546399,136061111,150851969,189448891,227353303,
%U A163442 249650309,256855171,328033129,361451309,507533053,710528249,815653171,1172016731
%N A163442 Primes of the form floor((p/3)^3), where p is prime.
%H A163442 G. C. Greubel, <a href="/A163442/b163442.txt">Table of n, a(n) for n = 1..1000</a>
%e A163442 (17/3)^3=181.963 -> 181, (31/3)^3=1103.37 -> 1103, (103/3)^3=40471.4 -> 40471
%t A163442 f[n_]:=IntegerPart[(p/3)^3]; lst={};Do[p=Prime[n];If[PrimeQ[f[p]],AppendTo[lst,f[p]]],{n,7!}];lst
%t A163442 Select[Table[Floor[(p/3)^3],{p,Prime[Range[800]]}],PrimeQ] (* _Harvey P. Dale_, Dec 16 2017 *)
%o A163442 (PARI) forprime(p=2,1e3,n=p^3\27;if(isprime(n),print1(n",")))
%Y A163442 Cf. A162652, A163418, A163419, A163420, A163421, A163422, A163424, A163425, A163426, A163427, A163428, A163429, A163430, A163431.
%K A163442 nonn
%O A163442 1,1
%A A163442 _Vladimir Joseph Stephan Orlovsky_, Jul 27 2009
%E A163442 Program and editing by _Charles R Greathouse IV_, Nov 09 2009