This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A007093 Numbers in base 7. (Formerly M0511) 38
 0, 1, 2, 3, 4, 5, 6, 10, 11, 12, 13, 14, 15, 16, 20, 21, 22, 23, 24, 25, 26, 30, 31, 32, 33, 34, 35, 36, 40, 41, 42, 43, 44, 45, 46, 50, 51, 52, 53, 54, 55, 56, 60, 61, 62, 63, 64, 65, 66, 100, 101, 102, 103, 104, 105, 106, 110, 111, 112, 113, 114, 115, 116, 120 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,3 REFERENCES N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence). LINKS Nathaniel Johnston, Table of n, a(n) for n = 0..10000 R. G. Wilson, V, Letter to N. J. A. Sloane, Sep. 1992 FORMULA a(0) = 0, a(n) = 10*a(n/7) if n==0 (mod 7), a(n) = a(n-1)+1 otherwise. - Benoit Cloitre, Dec 22 2002 MAPLE A007093 := proc(n) local l: if(n=0)then return 0: fi: l:=convert(n, base, 7): return op(convert(l, base, 10, 10^nops(l))): end: seq(A007093(n), n=0..63); # Nathaniel Johnston, May 06 2011 MATHEMATICA Table[ FromDigits[ IntegerDigits[n, 7]], {n, 0, 66}] PROG (PARI) a(n)=if(n<1, 0, if(n%7, a(n-1)+1, 10*a(n/7))) (PARI) a(n) = fromdigits(digits(n, 7)); \\ Michel Marcus, Aug 12 2018 CROSSREFS Cf. A000042, A007088, A007089, A007090, A007091, A007092, A007094, A007095. Sequence in context: A143693 A143694 A037476 * A285469 A302706 A047423 Adjacent sequences:  A007090 A007091 A007092 * A007094 A007095 A007096 KEYWORD nonn,easy,base AUTHOR 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
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 15 13:06 EDT 2019. Contains 328030 sequences. (Running on oeis4.)