login
Take list of odd numbers, move left digit of each term to end of previous term.
6

%I #9 Mar 09 2015 09:35:21

%S 1,3,5,7,9,1,11,31,51,71,92,12,32,52,72,93,13,33,53,73,94,14,34,54,74,

%T 95,15,35,55,75,96,16,36,56,76,97,17,37,57,77,98,18,38,58,78,99,19,39,

%U 59,79,91,11,31,51,71,91,111,131,151,171,191,211,231,251,271,291,311

%N Take list of odd numbers, move left digit of each term to end of previous term.

%H Reinhard Zumkeller, <a href="/A032764/b032764.txt">Table of n, a(n) for n = 0..10000</a>

%o (Haskell)

%o a032764 n = a032764_list !! n

%o a032764_list = 1 : map read (zipWith (++) vs (tail us)) :: [Integer]

%o where (us,vs) = unzip $ map ((splitAt 1) . show) [1, 3 ..]

%o -- _Reinhard Zumkeller_, Oct 10 2013

%Y Cf. A032759-A032762.

%Y Cf. A005408.

%K nonn,easy,base,look

%O 0,2

%A _Patrick De Geest_, May 15 1998