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 A217347 #19 Oct 03 2022 08:45:49 %S A217347 3,4,5,6,8,17,18,21,22,36,38,41,54,56,81,92,100,106,160,310,406,560, %T A217347 902,5549,9926,12334,19374,19995,20166,39609,62900,186903,244461 %N A217347 Numbers k such that 3^k - 10 is prime. %C A217347 a(33) > 2*10^5. - _Robert Price_, Sep 07 2013 %C A217347 a(34) > 3*10^5. - _Tyler NeSmith_, Oct 03 2022 %t A217347 Select[Range[2, 5000], PrimeQ[3^# - 10] &] %o A217347 (PARI) for(n=2, 5*10^3, if(isprime(3^n-10), print1(n", "))) %o A217347 (Magma) /* The code produces the sequence up to 560: */ [n: n in [2..800] | IsPrime(3^n - 10)]; %Y A217347 Cf. A014224, A051783, A058958, A058959. %K A217347 nonn,more %O A217347 1,1 %A A217347 _Vincenzo Librandi_, Oct 01 2012 %E A217347 a(24)-a(32) from _Robert Price_, Sep 07 2013 %E A217347 a(33) from _Tyler NeSmith_, Oct 03 2022