This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A097279 #3 Mar 30 2012 17:22:33
%S A097279 5,11,23,59,67,83,89,101,107,109,127,163,167,197,229,233,251,283,311,
%T A097279 317,349,421,491,557,577,643,673,683,719,727,761,827,1009,1061,1129,
%U A097279 1163,1193,1231,1327,1373
%N A097279 Alternating-harmonic primes.
%C A097279 These primes, analogous to the harmonic primes in A092101, divide exactly one term of A058313, the numerators of the alternating harmonic numbers. It can be shown that for prime p > 3, if p = 6k-1, then p divides A058313(4k-1), otherwise if p = 6k+1, then p divides A058313(4k). Much of the analysis by Eswarathasan and Levine applies to alternating harmonic sums.
%D A097279 A. Eswarathasan and E. Levine, p-integral harmonic sums, Discrete Math. 91 (1991), 249-257.
%t A097279 maxPrime=1000; lst={}; Do[p=Prime[n]; cnt=0; s=0; i=1; While[s=s+(-1)^(i-1)/i; If[Mod[Numerator[s], p]==0, cnt++ ]; cnt<2&&i<p^2, i++ ]; If[cnt==1, AppendTo[lst, p]], {n, 3, PrimePi[maxPrime]}]; lst
%K A097279 hard,nonn
%O A097279 1,1
%A A097279 _T. D. Noe_, Aug 04 2004