A167542 Natural numbers, swapped in pairs, with decimal digits reversed.
2, 1, 4, 3, 6, 5, 8, 7, 1, 9, 21, 11, 41, 31, 61, 51, 81, 71, 2, 91, 22, 12, 42, 32, 62, 52, 82, 72, 3, 92, 23, 13, 43, 33, 63, 53, 83, 73, 4, 93, 24, 14, 44, 34, 64, 54, 84, 74, 5, 94, 25, 15, 45, 35, 65, 55, 85, 75, 6, 95, 26, 16, 46, 36, 66, 56, 86, 76, 7, 96, 27, 17, 47, 37, 67
Offset: 1
Programs
-
Maple
read("transforms") ; A014681 := proc(n) option remember; if n <= 3 then op(n+1,[0,2,1,4]) ; else procname(n-1)+procname(n-2)-procname(n-3) ; end if; end proc: A167542 := proc(n) digrev(A014681(n)) ; end proc: seq(A167542(n),n=1..120) ; # R. J. Mathar, Jan 30 2010
Extensions
All terms from a(18) on corrected by R. J. Mathar, Jan 30 2010