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 A104364 #9 Apr 09 2024 05:15:22
%S A104364 5,11,59,179,1259,7559,37799,415799,1135133999,5499724229999,
%T A104364 29220034833989999,1408101540804746673385499999,
%U A104364 43673268652925265723884051023987499999
%N A104364 Primes of the form A104350(k) - 1.
%H A104364 Amiram Eldar, <a href="/A104364/b104364.txt">Table of n, a(n) for n = 1..26</a>
%t A104364 Select[FoldList[Times, Array[FactorInteger[#][[-1, 1]] &, 100]] - 1, PrimeQ] (* _Amiram Eldar_, Apr 08 2024 *)
%o A104364 (PARI) gpf(n) = {my(p = factor(n)[, 1]); if(n == 1, 1, p[#p]);}
%o A104364 lista(nmax) = {my(r = 1); for(k = 1, nmax, r * = gpf(k); if(isprime(r-1), print1(r-1, ", ")));} \\ _Amiram Eldar_, Apr 08 2024
%Y A104364 Intersection of A104357 and A000040.
%Y A104364 Cf. A104372, A104373, A055490, A057705.
%K A104364 nonn
%O A104364 1,1
%A A104364 _Reinhard Zumkeller_, Mar 06 2005