

A154282


Dirichlet inverse of A154281.


4



1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

Sequence is positive as often as negative.
Multiplicative because A154281 is.  Andrew Howroyd, Aug 05 2018


LINKS

Mats Granvik, Table of n, a(n) for n = 1..1500


MATHEMATICA

nn = 95; a = PadRight[{1, 0, 0, 1}, nn, 0]; Inverse[Table[Table[If[Mod[n, k] == 0, a[[n/k]], 0], {k, 1, nn}], {n, 1, nn}]][[All, 1]] (* Mats Granvik, Jul 23 2017 *)


PROG

(PARI) a(n) = {my(e=valuation(n, 2)); if(e%2 == 0 && n == 1<<e, (1)^(e/2), 0)} \\ Andrew Howroyd, Aug 05 2018


CROSSREFS

Cf. A154269, A154271, A154272.
Sequence in context: A246500 A185114 A154281 * A224877 A178600 A014702
Adjacent sequences: A154279 A154280 A154281 * A154283 A154284 A154285


KEYWORD

sign,mult


AUTHOR

Mats Granvik, Jan 06 2009


STATUS

approved



