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.

A242654 1 followed by the union of the terms > 2 in A002387 (or A004080) and A115515.

This page as a plain text file.
%I A242654 #8 Apr 10 2019 10:35:10
%S A242654 1,3,4,10,11,30,31,82,83,226,227,615,616,1673,1674,4549,4550,12366,
%T A242654 12367,33616,33617,91379,91380,248396,248397,675213,675214,1835420,
%U A242654 1835421,4989190,4989191,13562026,13562027,36865411,36865412,100210580,100210581,272400599,272400600,740461600,740461601,2012783314
%N A242654 1 followed by the union of the terms > 2 in A002387 (or A004080) and A115515.
%C A242654 _Ray Chandler_, May 29 2014, proposes this as the most likely continuation of A079353.
%t A242654 b[n_] := Ceiling[k /. FindRoot[HarmonicNumber[k] == n, {k, Exp[n]}, WorkingPrecision -> 100]] - 1;
%t A242654 bb = Array[b, 22];
%t A242654 A242654 = Union[bb, bb + 1] // Rest (* _Jean-François Alcover_, Apr 10 2019 *)
%Y A242654 Cf. A002387, A004080, A115515, A079353.
%K A242654 nonn
%O A242654 1,2
%A A242654 _N. J. A. Sloane_, May 29 2014