A070912 Binary expansion of BesselI(0,2).

1, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 1, 0, 0, 1, 0, 1, 1, 1, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 1

Offset

2,1

Links

Table of n, a(n) for n=2..106.

Example

10.010001111001...

Mathematica

RealDigits[BesselI[0, 2], 2, 100][[1]] (* Amiram Eldar, May 23 2022 *)

Prog

(PARI) concat(binary(besseli(0, 2))) \\ Charles R Greathouse IV, Apr 18 2016

Crossrefs

Cf. A070910.

Sequence in context: A359781 A030315 A119498 * A014108 A014207 A014072

Adjacent sequences: A070909 A070910 A070911 * A070913 A070914 A070915

Keyword

base,cons,easy,nonn

Author

Benoit Cloitre, May 20 2002

Status

approved