A119745 Inverse permutation to sequence A120255.

1, 2, 3, 5, 4, 15, 8, 6, 16, 28, 12, 17, 7, 70, 51, 18, 10, 19, 38, 155, 9, 156, 71, 20, 125, 62, 230, 72, 26, 1089, 157, 73, 52, 11, 379, 21, 48, 39, 143, 158, 53, 74, 481, 159, 1090, 75, 33, 22, 975, 3609, 231, 428, 131, 232, 13, 76, 233, 429, 1080, 1091, 29, 160, 77

Offset

1,2

Links

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

Prog

(PARI) {m=75; v=[]; for(n=2, m, v=concat(v, vecsort(eval(setminus(Set(divisors(fibonacci(n))), Set(v)))))); z=100; u=vector(z); for(j=1, #v, if(v[j]<=z, u[v[j]]=j)); i=1; while(u[i]>0, print1(u[i], ", "); i++)} - (Klaus Brockhaus, Aug 17 2006)

Crossrefs

Cf. A120255.

Sequence in context: A193770 A107476 A094140 * A095753 A139537 A111631

Adjacent sequences: A119742 A119743 A119744 * A119746 A119747 A119748

Keyword

nonn

Author

Leroy Quet, Jun 16 2006

Extensions

More terms from Klaus Brockhaus, Aug 17 2006

Status

approved