

A134768


First differences of variant of permutational numbers A134750 .


0



3, 1, 13, 2, 4, 4, 4, 2, 78, 3, 9, 6, 9, 3, 18, 3, 21, 9, 6, 6, 15, 6, 6, 9, 21, 3, 18, 3, 9, 6, 9, 3, 662, 4, 16, 8, 16, 4, 52, 4, 36, 12, 12, 8, 48, 8, 12, 12, 36, 4, 52, 4, 16, 8, 16, 4, 108, 4, 16, 8, 16, 4, 152, 4, 56, 16, 8, 12, 24, 8, 32, 16, 32, 8, 28, 4, 36, 12, 12, 8, 84, 4, 36, 12
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS

Table of n, a(n) for n=1..84.


MATHEMATICA

k = {}; a = {}; b = {}; Do[AppendTo[b, n]; w = Permutations[b]; Do[j = FromDigits[1 + w[[m]], n + 1]; AppendTo[a, j], {m, 1, Length[w]}], {n, 0, 6}]; Do[AppendTo[k, a[[n + 1]]  a[[n]]], {n, 1, Length[a]  1}]; k


CROSSREFS

Cf. A134640, A134641, A134750, A134766, A134767.
Sequence in context: A016479 A248843 A170910 * A295827 A277197 A297898
Adjacent sequences: A134765 A134766 A134767 * A134769 A134770 A134771


KEYWORD

nonn


AUTHOR

Artur Jasinski, Nov 10 2007


STATUS

approved



