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.

A244692 The spiral of Champernowne read by the East-Southeast ray.

This page as a plain text file.
%I A244692 #6 Jul 05 2014 17:08:44
%S A244692 1,1,0,6,1,8,2,2,9,4,5,6,7,9,0,5,3,1,5,8,2,2,1,5,9,2,9,4,4,3,8,6,7,4,
%T A244692 8,1,8,5,9,9,7,6,2,9,4,8,6,3,9,9,0,1,0,6,7,1,1,2,5,8,3,1,4,4,9,5,1,6,
%U A244692 3,0,7,1,8,2,1,0,2,1,1,2,2,2,3,0,3,5,2,6,9,4,8,2,9,8,5,0,3,2,7,6,4,3,5,6,7
%N A244692 The spiral of Champernowne read by the East-Southeast ray.
%F A244692 See A244677 formula section.
%e A244692 See A244677 for the spiral of David Gawen Champernowne.
%t A244692 almostNatural[n_, b_] := Block[{m = 0, d = n, i = 1, l, p}, While[m <= d, l = m; m = (b - 1) i*b^(i - 1) + l; i++]; i--; p = Mod[d - l, i]; q = Floor[(d - l)/i] + b^(i - 1); If[p != 0, IntegerDigits[q, b][[p]], Mod[q - 1, b]]]; f[n_] := 16n^2 - 39n + 24 (* see A244677 formula section *); Array[ almostNatural[ f@#, 10] &, 105]
%Y A244692 Cf. A033307, A143855, A033952, A244677-A244688, A244690, A244691.
%K A244692 nonn,easy
%O A244692 1,4
%A A244692 _Robert G. Wilson v_, Jul 04 2014