A063672 - OEIS

A063672

Sequence A019320 in binary.

10, 1, 11, 111, 101, 11111, 11, 1111111, 10001, 1001001, 1011, 11111111111, 1101, 1111111111111, 101011, 10010111, 100000001, 11111111111111111, 111001, 1111111111111111111, 11001101, 100100110111, 1010101011

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

OFFSET

0,1

LINKS

Paolo Xausa, Table of n, a(n) for n = 0..900

MAPLE

map(convert, A019320, binary); or up to n=104 with: map(convert, [seq(Phi_pos_terms(j, 2)-Phi_neg_terms(j, 2), j=0..104)], binary);

MATHEMATICA

A063672[n_] := If[n == 0, 10, FromDigits[IntegerDigits[Cyclotomic[n, 2], 2]]];

Array[A063672, 30, 0] (* Paolo Xausa, Feb 26 2024 *)

CROSSREFS

Cf. A063697, A063699, A063671.

Sequence in context: A164844 A287015 A130311 * A070606 A332803 A073731

Adjacent sequences: A063669 A063670 A063671 * A063673 A063674 A063675

KEYWORD

nonn,base

AUTHOR

Antti Karttunen, Aug 03 2001

STATUS

approved