cp's OEIS Frontend

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.

A348760 For any nonnegative number n with binary expansion Sum_{k >= 0} b_k * 2^k, a(n) is the real part of f(n) = Sum_{k >= 0} ((-1)^Sum_{j = 0..k-1} b_j) * (1+i)^k (where i denotes the imaginary unit); sequence A348761 gives the imaginary part.

This page as a plain text file.
%I A348760 #10 Nov 01 2021 16:54:40
%S A348760 0,1,1,0,0,1,1,0,-2,3,3,-2,2,-1,-1,2,-4,5,5,-4,4,-3,-3,4,2,-1,-1,2,-2,
%T A348760 3,3,-2,-4,5,5,-4,4,-3,-3,4,2,-1,-1,2,-2,3,3,-2,0,1,1,0,0,1,1,0,-2,3,
%U A348760 3,-2,2,-1,-1,2,0,1,1,0,0,1,1,0,-2,3,3,-2,2,-1
%N A348760 For any nonnegative number n with binary expansion Sum_{k >= 0} b_k * 2^k, a(n) is the real part of f(n) = Sum_{k >= 0} ((-1)^Sum_{j = 0..k-1} b_j) * (1+i)^k (where i denotes the imaginary unit); sequence A348761 gives the imaginary part.
%C A348760 The function f defines a bijection from the nonnegative integers to the Gaussian integers.
%H A348760 Rémy Sigrist, <a href="/A348760/b348760.txt">Table of n, a(n) for n = 0..8191</a>
%H A348760 Rémy Sigrist, <a href="/A348760/a348760.png">Colored representation of f(n) for n < 2^20 in the complex plane</a> (the hue is function of n)
%H A348760 Rémy Sigrist, <a href="/A348760/a348760_1.png">Colored representation of f(n) for n < 2^18 in the complex plane</a> (the color is function of A000120(n) mod 2)
%H A348760 Rémy Sigrist, <a href="/A348760/a348760_2.png">Colored representation of f(n) for n < 2^18 in the complex plane</a> (the color is function of the binary length of n, A070939(n))
%H A348760 Rémy Sigrist, <a href="/A348760/a348760_3.png">Colored representation of f(n) for n < 2^18 in the complex plane</a> (the color is function of A000120(n), darker shades correspond to higher values)
%F A348760 a(2^k) = A146559(k) for any k >= 0.
%o A348760 (PARI) a(n) = { my (v=0, k, o=-1); while (n, n-=2^k=valuation(n,2); v+=(1+I)^k * (-1)^o++); real(v) }
%Y A348760 See A348690 for a similar sequence.
%Y A348760 Cf. A000120, A070939, A146559, A348761.
%K A348760 sign,base
%O A348760 0,9
%A A348760 _Rémy Sigrist_, Oct 31 2021