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.

A097601 Differences between A045918 and A047842.

This page as a plain text file.
%I A097601 #10 Feb 15 2019 10:04:34
%S A097601 0,0,0,0,0,0,0,0,0,0,99,0,0,0,0,0,0,0,0,0,198,99,0,0,0,0,0,0,0,0,297,
%T A097601 198,99,0,0,0,0,0,0,0,396,297,198,99,0,0,0,0,0,0,495,396,297,198,99,0,
%U A097601 0,0,0,0,594,495,396,297,198,99,0,0,0,0,693,594,495,396,297,198,99,0,0
%N A097601 Differences between A045918 and A047842.
%H A097601 G. C. Greubel, <a href="/A097601/b097601.txt">Table of n, a(n) for n = 0..10000</a>
%t A097601 LookAndSayA[n_]:= FromDigits@Flatten@IntegerDigits@Flatten[Through[ {Length, First}[#]] & /@ Split@IntegerDigits@n]; dc[n_]:= FromDigits@ Flatten@Select[Table[{DigitCount[n, 10, k], k}, {k, 0, 9}], #[[1]] > 0 &]; Table[LookAndSayA[n] - dc[n], {n, 0, 100}]
%Y A097601 Cf. A045918, A047842.
%K A097601 easy,sign,base
%O A097601 0,11
%A A097601 _Odimar Fabeny_, Aug 29 2004
%E A097601 Terms a(31) onward added by _G. C. Greubel_, Jan 14 2019