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 A075079 #18 Jun 13 2021 10:19:13 %S A075079 1,8,9,36,81,125,128,216,243,441,576,729,900,1089,1296,1331,1728,1764, %T A075079 2025,4356,5184,5625,7569,8000,8649,9216,9261,9801,10404,11025,15129, %U A075079 17424,17576,18225,19683,23409,24336,24389,26244,27000,31329,32768,34596,35721 %N A075079 Numbers k in A001597 such that 2*k + 1 is prime. %e A075079 2*8 + 1 = 17 is prime, so 8 is a term. %o A075079 (PARI) lista(nn) = {vec = vector(nn, i, i); pp = select(i->((ispower(i) || (i==1)) && isprime(2*i+1)), vec); for (i = 1, #pp, print1(pp[i], ", "));} \\ _Michel Marcus_, Oct 02 2013 %Y A075079 Cf. A001597, A075081. %K A075079 easy,nonn %O A075079 1,2 %A A075079 _Zak Seidov_, Oct 11 2002 %E A075079 More terms from _Michel Marcus_, Oct 02 2013