A128757 Inverse permutation to A128756.
9, 5, 2, 11, 10, 1, 4, 23, 8, 20, 6, 7, 24, 3, 12, 27, 14, 64, 21, 13, 16, 17, 18, 41, 49, 15, 26, 33, 28, 32, 22, 25, 30, 29, 38, 19, 39, 53, 34, 59, 36, 35, 40, 37, 42, 72, 44, 31, 95, 45, 46, 43, 52, 56, 48, 51, 75, 47, 66, 85, 58, 55, 54, 57, 71, 61, 50, 63, 87, 65, 62, 78
Offset: 1
Keywords
Links
Programs
-
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)} a=pinverse(A128756)
Comments