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 A070762 #22 Feb 16 2025 08:32:46 %S A070762 3,4,6,7,9,10,11,12,38,42,59,96,154,171,211,313,465,563,1040,1176, %T A070762 1213,1431,1519,1987,2527,3033,4039,4209,4358,5109,5251,6642,19200, %U A070762 25275,42589,43025,49294,58585,66290,77458,80409,86533,94192,110452,115166,124470 %N A070762 n for which floor((4/3)^n) is prime. %D A070762 R. K. Guy, Unsolved Problems in Number Theory, E19. %H A070762 Giovanni Resta, <a href="/A070762/b070762.txt">Table of n, a(n) for n = 1..53</a> (terms < 400000) %H A070762 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/PowerFloors.html">Power Floors</a> %t A070762 Do[ If[ PrimeQ[ Floor[(4/3)^n]], Print[n]], {n, 1, 17500}] %t A070762 Select[Range[7000],PrimeQ[Floor[(4/3)^#]]&] (* The program generates the first 32 terms of the sequence. *) (* _Harvey P. Dale_, Oct 02 2024 *) %Y A070762 Cf. A046038, A067905, A070761, A070759. %K A070762 nonn %O A070762 1,1 %A A070762 _Eric W. Weisstein_, May 04 2002 %E A070762 Corrected by _Robert G. Wilson v_, Jan 15 2003 %E A070762 More terms from _Ryan Propper_, Jan 25 2008