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 A004683 #18 Sep 08 2022 08:44:33
%S A004683 2,3,5,7,12,14,18,21,25,32,34,41,45,47,52,58,65,67,74,78,81,87,102,
%T A004683 108,117,122,124,128,131,135,151,155,162,164,175,177,184,201,205,212,
%U A004683 218,221,232,234,238,241,254,267
%N A004683 Primes written in base 9.
%H A004683 Zak Seidov, <a href="/A004683/b004683.txt">Table of n, a(n) for n = 1..1000</a>
%t A004683 Table[FromDigits[IntegerDigits[Prime[n], 9]], {n, 100}] (* _Zak Seidov_, Apr 25 2016 *)
%o A004683 (PARI) a(n)=subst(Pol(digits(prime(n),9)),'x,10) \\ _Charles R Greathouse IV_, Nov 06 2013
%o A004683 (PARI) vector(50, n, fromdigits(digits(prime(n), 9))) \\ _G. C. Greubel_, Oct 09 2018
%o A004683 (Magma) [Seqint(Intseq(NthPrime(n),9)): n in [1..50]]; // _G. C. Greubel_, Oct 09 2018
%Y A004683 Subsequence of A007095.
%K A004683 nonn,easy,base
%O A004683 1,1
%A A004683 _N. J. A. Sloane_