A168395 - OEIS

A168395

Moebius function of odd interprimes (A072569).

0, 1, 1, 1, 0, 1, 0, 1, 0, -1, 1, 1, -1, -1, 1, 1, 0, -1, 0, 1, 0, 0, 0, 1, 1, -1, 0, 0, 1, 0, -1, 1, -1, 1, 0, 1, 1, -1, 0, -1, 1, 0, 1, -1, 1, -1, 0, -1, 0, 1, 1, 0, 0, -1, 1, -1, -1, 0, -1, 1, 1, -1, -1, 1, 1, 0, -1, -1, 1, 0, 1, 0, 1, -1, 1, 0, 1, 0, 0, 0, -1, 0, 1, 0, -1, -1, 1, 1, 1, -1, 1, 1, 0

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Table of n, a(n) for n=1..93.

MAPLE

ts_fip_lih:=proc(n) local i, an, tren: an:=[ ]: for i from 2 to n do tren:=(ithprime(i)+ithprime(i+1))/2: if (tren mod 2 <> 0) then # an:=[ op(an), tren ]: an:=[ op(an), numtheory[mobius](tren) ]: fi: od: RETURN(an) end: ts_fip_lih(2000);

CROSSREFS

Cf. A008683.

Sequence in context: A167392 A190201 A189702 * A278718 A130854 A165191

Adjacent sequences: A168392 A168393 A168394 * A168396 A168397 A168398

KEYWORD

sign

AUTHOR

Jani Melik, Nov 24 2009

STATUS

approved