OFFSET
1,1
COMMENTS
a(n) is the rank of prime(n) in the base-8 dominance order on the natural numbers.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..10000
Tyler Ball and Daniel Juda, Dominance over N, Rose-Hulman Undergraduate Mathematics Journal, Vol. 13, No. 2, Fall 2013.
EXAMPLE
The sixth prime is 13, 13 in base 8 is (1,5) so a(6)=1+5=6.
MATHEMATICA
Table[Plus @@ IntegerDigits[Prime[n], 8], {n, 1, 100}] (* Vincenzo Librandi, Mar 25 2014 *)
PROG
(Sage) [sum(i.digits(base=8)) for i in primes_first_n(200)]
(Magma) [&+Intseq(NthPrime(n), 8): n in [1..100]]; // Vincenzo Librandi, Mar 25 2014
(PARI) a(n) = sumdigits(prime(n), 8); \\ Michel Marcus, Mar 04 2023
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Tom Edgar, Mar 24 2014
STATUS
approved