login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A135101 Digital sum (base the n-th prime) of n^n. 2
1, 2, 3, 10, 15, 24, 55, 46, 71, 116, 101, 180, 213, 196, 205, 276, 307, 444, 337, 610, 621, 646, 687, 808, 985, 876, 921, 996, 1049, 1184, 1417, 1576, 1665, 1576, 2127, 1836, 2377, 1660, 2201, 2088, 2731, 2844, 2847, 2944, 3317, 3232, 3503, 3294, 3165 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

G. C. Greubel, Table of n, a(n) for n = 1..1000

FORMULA

a(n) = ds_prime(n)(n^n), where ds_prime(n) = digital sum base the n-th prime.

a(n) = n^n - (prime(n)-1)*Sum{k>0} ( floor(n^n/prime(n)^k) ).

EXAMPLE

a(2) = ds_prime(2)(2^2) = ds_3(4) = 1+1 = 2;

a(10) = ds_prime(5)(5^5) = ds_11(3125) = 2+3+9+1 = 15.

MATHEMATICA

Table[Total[IntegerDigits[n^n, Prime[n]]], {n, 50}] (* G. C. Greubel, Sep 23 2016 *)

PROG

a(n) = vecsum(digits(n^n, prime(n))); \\ Michel Marcus, Sep 24 2016

CROSSREFS

Cf. A000040, A000045, A007953, A054899, A075771, A131451, A133620, A133900, A134599.

Sequence in context: A268878 A194544 A075770 * A108065 A187767 A226881

Adjacent sequences:  A135098 A135099 A135100 * A135102 A135103 A135104

KEYWORD

nonn,base

AUTHOR

Hieronymus Fischer, Dec 24 2007

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 17 21:36 EDT 2019. Contains 325109 sequences. (Running on oeis4.)