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.

A022826 a(n) = a([ (n+1)/2 ]) + a([ (n+1)/3 ]) + . . . + a([ (n+1)/n ]).

This page as a plain text file.
%I A022826 #7 Jan 25 2018 16:34:04
%S A022826 1,1,2,3,5,6,8,10,13,14,18,19,22,26,30,31,37,38,43,47,52,53,60,63,67,
%T A022826 72,80,81,91,92,97,103,110,115,124,125,131,136,147,148,162,163,170,
%U A022826 181,189,190,201,204,212,220,230,231,246,253,264,271,282,283
%N A022826 a(n) = a([ (n+1)/2 ]) + a([ (n+1)/3 ]) + . . . + a([ (n+1)/n ]).
%H A022826 Ivan Neretin, <a href="/A022826/b022826.txt">Table of n, a(n) for n = 0..10000</a>
%t A022826 Nest[Append[#, Total@#[[Quotient[2 + Length@#, Range[2, 1 + Length@#]]]]] &, {1}, 57] (* _Ivan Neretin_, Jan 25 2018 *)
%K A022826 nonn
%O A022826 0,3
%A A022826 _Clark Kimberling_