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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A090432 Primes prime(k) having a greater sum of digits than does k. 3

%I

%S 2,3,5,7,17,19,29,31,37,41,43,47,53,59,67,71,73,79,83,89,97,113,127,

%T 137,139,149,157,167,173,179,181,191,193,197,199,229,233,239,257,269,

%U 277,281,283,293,307,349,353,359,367,373,379,383,389,397,409,419,439

%N Primes prime(k) having a greater sum of digits than does k.

%C A090431(a(n)) < 0.

%t Prime[#]&/@Select[Range[100],Total[IntegerDigits[Prime[#]]]-Total[IntegerDigits[#]]>0&] (* _Michel Lagneau_, Nov 07 2015 *)

%o (PARI) isok(n) = sumdigits(prime(n)) > sumdigits(n); \\ _Michel Marcus_, Nov 07 2015

%Y Cf. A007605, A007953, A033548, A090431, A090433, A090456.

%K nonn,base

%O 1,1

%A _Reinhard Zumkeller_, Dec 01 2003

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 January 25 19:09 EST 2020. Contains 331249 sequences. (Running on oeis4.)