login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A262229 Numbers m such that A000217(m) > A062918(m). 1
10, 11, 87, 88, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 895, 896, 897, 898, 899, 900, 901, 902, 903, 904, 905, 906, 907, 908, 909, 910, 911, 912, 913, 914, 915, 916, 917, 918, 919, 920, 921, 922, 923, 924, 925, 926, 927, 928, 929, 930, 931 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
COMMENTS
The sum of the digit reversals of first n natural numbers (A062918) is equal to the sum of the first n natural numbers (A000217) for n=1 to 9. Then 10 is the first time that A000217(m) > A062918(m).
LINKS
Didier Müller, Somme des premiers entiers inversés, Défi Turing (in French).
EXAMPLE
For m=10, 1+2+3+4+5+6+7+8+9+10 is > 1+2+3+4+5+6+7+8+9+01, so 10 is a term.
MATHEMATICA
lim = 931; t = Rest@ Accumulate[Range[0, lim]]; s = Accumulate[Table[FromDigits[Reverse[IntegerDigits@ n]], {n, 1, lim + 1}]]; Select[Range@ lim, t[[#]] > s[[#]] &] (* Michael De Vlieger, Sep 15 2015, after Harvey P. Dale at A000217 and Enrique Pérez Herrero at A062918 *)
PROG
(PARI) isok(n) = n*(n+1)/2 - sum(k=1, n, eval(concat(Vecrev(Str(k))))) > 0;
(Magma) [m: m in [0..10^3] | m*(m+1)/2 gt &+[Seqint(Reverse(Intseq(i))): i in [0..m]]]; // Bruno Berselli, Sep 16 2015
CROSSREFS
Sequence in context: A037958 A041214 A228381 * A347182 A331604 A086457
KEYWORD
nonn,base
AUTHOR
Michel Marcus, Sep 15 2015
STATUS
approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 16:58 EDT 2024. Contains 371254 sequences. (Running on oeis4.)