The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A041000 If decimal expansion of n-th prime is x1 x2 ... xk, sort the xi into nonincreasing order, y1 y2 ... yk; then a(n) = |y1-y2-y3...-yk|. 4

%I

%S 2,3,5,7,0,2,6,8,1,7,2,4,3,1,3,2,4,5,1,6,4,2,5,1,2,0,2,6,8,1,4,1,3,5,

%T 4,3,1,2,0,3,1,6,7,5,1,1,0,1,3,5,2,4,1,2,0,1,1,4,2,5,3,4,4,1,1,3,1,1,

%U 0,2,1,1,2,1,1,2,2,1,3,5,4,1,0,2,2,3,1,2,1,1,3,2,3,4,4,2,4,2,0,0,2,3,2,2,1,5

%N If decimal expansion of n-th prime is x1 x2 ... xk, sort the xi into nonincreasing order, y1 y2 ... yk; then a(n) = |y1-y2-y3...-yk|.

%F a(n)=|A007953(n)-2*A054055(n)|. [_Charles R Greathouse IV_, May 07, 2011]

%e a(397)=|9-7-3|=1.

%t der[n_]:=Module[{c=Reverse[Sort[IntegerDigits[n]]]},Abs[First[c]-Total[Rest[c]]]]; der/@Prime[Range[110]] (* _Harvey P. Dale_, Aug 15 2012 *)

%Y Cf. A040164.

%K easy,nonn,base

%O 1,1

%A _Felice Russo_

%E More terms from _Michel ten Voorde_

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.

Last modified May 6 13:04 EDT 2021. Contains 343585 sequences. (Running on oeis4.)