|
Search: id:A165303
|
|
|
| A165303 |
|
a(n) is the smallest number not already in the sequence, such that the concatenation of all a(n) displays the periodic digit string 1, 2, 3, 4, 5 (and repeat). |
|
+0
3
|
|
| 1, 2, 3, 4, 5, 12, 34, 51, 23, 45, 123, 451, 234, 512, 345, 1234, 5123, 4512, 3451, 2345, 12345, 123451, 23451, 234512, 34512, 345123, 45123, 451234, 51234, 512345, 1234512, 3451234, 5123451, 2345123, 4512345, 12345123, 45123451, 23451234, 51234512
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
EXAMPLE
|
Starting from 1, 2, 3, 4, 5, the next number must be 12 because we need to continue with a 1. But 1 is already in the sequence so we need to attach a 2 -> 12. And so on.
|
|
MAPLE
|
cyc5 := proc(n) op(n, [2, 3, 4, 5, 1]) ; end:
A165303 := proc(n) option remember ; local k, prev, d, a ; if n = 1 then 1; else d := cyc5(procname(n-1) mod 10) ; a := d ; while true do prev := false; for k from 1 to n-1 do if procname(k) = a then prev := true; break; end if; end do; if not prev then return a; end if; d := cyc5(d) ; a := 10*a+d ; end do; end if ; end proc:
seq(A165303(n), n=1..60) ; # R. J. Mathar, Oct 16 2009
|
|
CROSSREFS
|
A165300-A165302, A165304-A165307
Sequence in context: A069469 A109849 A007662 this_sequence A109744 A065635 A101546
Adjacent sequences: A165300 A165301 A165302 this_sequence A165304 A165305 A165306
|
|
KEYWORD
|
easy,base,nonn
|
|
AUTHOR
|
Paolo P. Lava & Giorgio Balzarotti (ppl(AT)spl.at), Sep 14 2009
|
|
EXTENSIONS
|
Keyword:base added, sequence extended by R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Oct 16 2009
|
|
|
Search completed in 0.002 seconds
|
