A345110 a(n) is n rotated one place to the left or, equivalently, n with the most significant digit moved to the least significant place, omitting leading zeros.

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 1, 11, 21, 31, 41, 51, 61, 71, 81, 91, 2, 12, 22, 32, 42, 52, 62, 72, 82, 92, 3, 13, 23, 33, 43, 53, 63, 73, 83, 93, 4, 14, 24, 34, 44, 54, 64, 74, 84, 94, 5, 15, 25, 35, 45, 55, 65, 75, 85, 95, 6, 16, 26, 36, 46, 56, 66, 76, 86

Offset

0,3

Comments

First differs from A004086 at n = 101, since A004086(101) = 101, but a(101) = 11.

Links

Table of n, a(n) for n=0..68.

Example

For n = 123: When 123 is rotated one place to the left the resulting number is 231, so a(123) = 231.

Mathematica

Array[FromDigits@*RotateLeft@*IntegerDigits, 100, 0] (* Giorgos Kalogeropoulos, Jun 09 2021 *)

Prog

(PARI) eva(n) = subst(Pol(n), x, 10)
rot(vec) = if(#vec < 2, return(vec)); my(s=concat(Str(2), ".."), v=[]); s=concat(s, Str(#vec)); v=vecextract(vec, s); v=concat(v, vec[1]); v
a(n) = eva(rot(digits(n)))
(Python)
def rotl(s): return s[1:] + s[0]
def a(n): return int(rotl(str(n)))
print([a(n) for n in range(69)]) # Michael S. Branicky, Jun 09 2021

Crossrefs

Cf. A004086, A345111, A345112, A345113, A345114, A345115.

Rotate left in other bases: A006257, A048787, A255689, A255691, A255692, A255693.

Sequence in context: A107603 A161594 A084011 * A004086 A121760 A061816

Adjacent sequences: A345107 A345108 A345109 * A345111 A345112 A345113

Keyword

nonn,base,easy

Author

Felix Fröhlich, Jun 09 2021

Status

approved