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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A059995 Drop final digit of n. 16

%I

%S 0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,3,3,3,3,

%T 3,3,3,3,3,3,4,4,4,4,4,4,4,4,4,4,5,5,5,5,5,5,5,5,5,5,6,6,6,6,6,6,6,6,

%U 6,6,7,7,7,7,7,7,7,7,7,7,8,8,8,8,8,8,8,8,8,8,9,9,9,9,9,9,9,9,9,9,10,10,10

%N Drop final digit of n.

%H Harry J. Smith, <a href="/A059995/b059995.txt">Table of n, a(n) for n = 0..1000</a>

%H <a href="/index/Fi#final">Index entries for sequences related to final digits of numbers</a>

%H <a href="/index/Rec#order_11">Index entries for linear recurrences with constant coefficients</a>, signature (1,0,0,0,0,0,0,0,0,1,-1).

%F a(n) = a(n-10) + 1 = floor(n/10) = (n - A010879(n))/10.

%F G.f.: x^10/((1-x)(1-x^10)).

%F Partial sums are given by A131242. - _Hieronymus Fischer_, Jun 21 2007

%t Table[FromDigits[Most[IntegerDigits[n]]],{n,0,110}] (* _Harvey P. Dale_, Sep 09 2016 *)

%o (PARI) a(n)=if(n<0,0,n\10)

%o (PARI) { for (n=0, 1000, write("b059995.txt", n, " ", n\10); ) } \\ _Harry J. Smith_, Jul 01 2009

%o (Sage) [floor(n/5)-floor(n/10) for n in xrange(-5,98)] # _Zerinvary Lajos_, Dec 02 2009

%Y Cf. A004526, A054899.

%K base,easy,nonn

%O 0,21

%A _Henry Bottomley_, Mar 12 2001

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 February 16 02:39 EST 2019. Contains 320140 sequences. (Running on oeis4.)