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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A004151 Omit trailing zeros from n. 15
1, 2, 3, 4, 5, 6, 7, 8, 9, 1, 11, 12, 13, 14, 15, 16, 17, 18, 19, 2, 21, 22, 23, 24, 25, 26, 27, 28, 29, 3, 31, 32, 33, 34, 35, 36, 37, 38, 39, 4, 41, 42, 43, 44, 45, 46, 47, 48, 49, 5, 51, 52, 53, 54, 55, 56, 57, 58, 59, 6, 61, 62, 63, 64, 65, 66, 67, 68, 69, 7, 71, 72, 73, 74, 75, 76, 77, 78, 79, 8, 81, 82, 83, 84, 85, 86, 87, 88, 89, 9, 91, 92, 93, 94, 95, 96, 97, 98, 99, 1, 101, 102, 103, 104, 105, 106, 107, 108, 109, 11, 111, 112, 113, 114, 115, 116, 117, 118, 119, 12 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

FORMULA

a(n) = if n mod 10 = 0 then a(n/10) else n. [Reinhard Zumkeller, Feb 02 2012]

MATHEMATICA

Flatten[Table[n/Take[Intersection[Divisors[n], 10^Range[0, Floor[Log[10, n]]]], -1], {n, 120}]] (* Alonso del Arte, Feb 02 2012 *)

PROG

(Haskell)

a004151 = until ((> 0) . (`mod` 10)) (`div` 10)

-- Reinhard Zumkeller, Feb 01 2012

(PARI) a(n)=n/10^valuation(n, 10) \\ Charles R Greathouse IV, Oct 31 2012

CROSSREFS

Cf. A004719.

Cf. A122840.

Sequence in context: A004185 A068636 A004719 * A151765 A107603 A161594

Adjacent sequences:  A004148 A004149 A004150 * A004152 A004153 A004154

KEYWORD

nonn,base,easy

AUTHOR

N. J. A. Sloane.

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified May 24 17:37 EDT 2017. Contains 286997 sequences.