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