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