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 A239690 #20 Mar 04 2023 04:25:38
%S A239690 2,3,2,4,5,4,2,4,5,5,7,4,5,7,8,5,8,7,4,5,4,7,5,5,4,5,7,8,7,5,10,5,5,7,
%T A239690 5,7,7,7,8,8,8,7,11,4,5,7,7,10,8,7,8,11,7,11,2,5,5,7,4,5,7,5,7,8,7,8,
%U A239690 7,4,8,7,5,8,10,7,10,11,5,7,5,7,8,7,11,7
%N A239690 Base 4 sum of digits of prime(n).
%C A239690 a(n) is the rank of prime(n) in the base-4 dominance order on the natural numbers.
%H A239690 Vincenzo Librandi, <a href="/A239690/b239690.txt">Table of n, a(n) for n = 1..10000</a>
%H A239690 Tyler Ball and Daniel Juda, <a href="https://scholar.rose-hulman.edu/rhumj/vol14/iss2/2">Dominance over N</a>, Rose-Hulman Undergraduate Mathematics Journal, Vol. 13, No. 2, Fall 2013.
%F A239690 a(n) = A053737(A000040(n)).
%e A239690 The sixth prime is 13, 13 in base 4 is (3,1) so a(6)=3+1=4.
%t A239690 Table[Plus @@ IntegerDigits[Prime[n], 4], {n, 1, 100}] (* _Vincenzo Librandi_, Mar 25 2014 *)
%o A239690 (Sage) [sum(i.digits(base=4)) for i in primes_first_n(200)]
%o A239690 (Magma) [&+Intseq(NthPrime(n),4): n in [1..100]]; // _Vincenzo Librandi_, Mar 25 2014
%o A239690 (Haskell)
%o A239690 a239690 = a053737 . a000040 -- _Reinhard Zumkeller_, Mar 20 2015
%Y A239690 Cf. A007605, A014499, A053737, A239619.
%Y A239690 Cf. A000040, A007090.
%K A239690 nonn,base,hear
%O A239690 1,1
%A A239690 _Tom Edgar_, Mar 24 2014