1,1

(PARI) xp1toxp1(n)= { sr=0; forstep(x=2, n, 1, y=(x+1)^x - x^(x-1); if(ispseudoprime(y), print(x" "y" "); sr+= 1.0/y; ) ); print(); print(sr) }

Sequence in context: A163782 A051677 A122965 this_sequence A007503 A112967 A109150

Adjacent sequences: A054460 A054461 A054462 this_sequence A054464 A054465 A054466

nonn

Cino Hilliard (hillcino368(AT)gmail.com), Aug 30 2003