A248913 A248614(n+1) - A248614(n).
1, 1, 2, 2, 4, 2, 4, 2, 2, 2, 6, 2, 6, 4, 2, 2, 2, 2, 4, 6, 2, 6, 4, 2, 6, 2, 2, 2, 4, 2, 2, 4, 4, 2, 4, 2, 2, 2, 4, 4, 6, 4, 2, 4, 2, 2, 4, 4, 2, 6, 6, 2, 2, 6, 2, 2, 2, 2, 10, 2, 4, 2, 2, 4, 4, 2, 2, 4, 4, 2, 4, 2, 2, 2, 2, 4, 2, 6, 4, 2, 4, 4, 2, 2, 4, 2
Offset: 0
Keywords
Links
Programs
-
PARI
lista() = {vbden = readvec("c:/gp/bfiles/b027642.txt"); vredu = readvec("c:/gp/bfiles/b090126.txt"); vrank = []; for (i=1, #vredu, val = vredu[i]; k = 1; while(vbden[k] != val, k++); vrank = concat(vrank, k-1);); for (i=2, #vrank, print1(vrank[i] - vrank[i-1], ", "););} \\ Michel Marcus, Nov 08 2014
Extensions
More terms from Michel Marcus, Nov 08 2014
Comments