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!)
A054787 Earliest sequence with a(a(n))=7n. 1
0, 2, 7, 4, 21, 6, 35, 14, 9, 56, 11, 70, 13, 84, 49, 16, 105, 18, 119, 20, 133, 28, 23, 154, 25, 168, 27, 182, 147, 30, 203, 32, 217, 34, 231, 42, 37, 252, 39, 266, 41, 280, 245, 44, 301, 46, 315, 48, 329, 98, 51, 350, 53, 364, 55, 378, 63, 58, 399, 60, 413, 62, 427, 392 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,2
LINKS
FORMULA
a(7n)=7*a(n), a(7n+1)=7n+2, a(7n+2)=49n+7, a(7n+3)=7n+4, a(7n+4)=49n+21, a(7n+5)=7n+6, a(7n+6)=49n+35
MATHEMATICA
a[n_] := a[n] = Which[ Mod[n, 7] == 0, 7*a[n/7], Mod[n, 7] == 1, n+1, Mod[n, 7] == 2, 7*(n-2)+7, Mod[n, 7] == 3, n+1, Mod[n, 7] == 4, 7*(n-4)+21, Mod[n, 7] == 5, n+1, Mod[n, 7] == 6, 7*(n-6)+35]; a[0] = 0; Table[a[n], {n, 0, 63}] (* Jean-François Alcover, Sep 24 2012 *)
CROSSREFS
Sequence in context: A115857 A065621 A036565 * A190716 A303384 A013623
KEYWORD
nice,nonn
AUTHOR
Henry Bottomley, Apr 27 2000
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 29 05:48 EDT 2024. Contains 371265 sequences. (Running on oeis4.)