|
| |
| |
|
|
|
7, 8, 2, 1, 15, 3, 14, 5, 4, 23, 6, 9, 12, 55, 10, 11, 20, 13, 21, 29, 16, 19, 18, 30, 22, 38, 24, 43, 26, 17, 28, 27, 37, 25, 39, 31, 32, 54, 34, 61, 40, 33, 42, 41, 58, 35, 36, 45, 48, 47, 46, 57, 44, 78, 50, 51, 64, 76, 56, 74, 52, 49, 60, 63, 77, 53, 62, 59, 83, 67, 66, 65
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Seemingly the inversion maintains the characteristics of being an "infinite braid".
|
|
|
LINKS
| Ferenc Adorjan, Table of n,a(n) for n=1..10000
|
|
|
PROG
| (PARI) {pinverse(v)= /* Permutation inverse of a positive sequence */
local(n, m, x); n=matsize(v)[2]; x=vector(n);
for(i=1, n, if(v[i]<=n, x[v[i]]=i)); return(x)}
pinverse(A128754)
|
|
|
CROSSREFS
| Inverse of A128754, Cf. A128756, A128757.
Sequence in context: A171274 A126625 A154169 * A088367 A196610 A198938
Adjacent sequences: A128752 A128753 A128754 * A128756 A128757 A128758
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Ferenc Adorjan (fadorjan(AT)freemail.hu or ferencadorjan(AT)gmail.com), Mar 24 2007
|
| |
|
|
