1,1
(PARI) f(n)= s=0; for(i=1, n, s=s+1/(prime(i)-i)); return(s); for (i=1, 500, if(isprime(i) && isprime(numerator(f(i))), print1(i, ", ")));
Sequence in context: A090716 A083820 A052088 * A028981 A052016 A120804
Adjacent sequences: A092063 A092064 A092065 * A092067 A092068 A092069
hard,nonn
Mohammed Bouayoun (mohammed.bouayoun(AT)sanef.com), Feb 20 2004