login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A098240
Numbers k such that gcd(2k+1, numerator(Bernoulli(4k+2))) is squarefree.
3
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 61, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77
OFFSET
1,2
LINKS
MATHEMATICA
Select[Range[80], SquareFreeQ[GCD[2#+1, BernoulliB[4#+2]]]&] (* Harvey P. Dale, Jul 23 2013 *)
PROG
(PARI) for(n=1, 3000, if(issquarefree(gcd(2*n+1, numerator(bernfrac(4*n+2)))), print1(n", "))) \\ Herman Jamke (hermanjamke(AT)fastmail.fm), Nov 02 2006
CROSSREFS
Complement of A098242.
Sequence in context: A353838 A183224 A357862 * A023805 A168186 A353866
KEYWORD
nonn
AUTHOR
Ralf Stephan, Sep 01 2004
STATUS
approved