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.

A073362 Nested floor product of n and fractions (k+1)/k for all k>0 (mod 5), divided by 5.

This page as a plain text file.
%I A073362 #8 Mar 20 2015 03:32:51
%S A073362 1,6,19,48,109,234,355,552,1009,1518,2371,3804,4141,6342,8803,12096,
%T A073362 14389,18438,24043,27720,36397,45366,60499,75876,80137,97566,114931,
%U A073362 140892,166321,205926,218587,266664,292429,342006,394651,477336,481429
%N A073362 Nested floor product of n and fractions (k+1)/k for all k>0 (mod 5), divided by 5.
%F A073362 a(n)=(1/5)[...[[[[n(2/1)](3/2)](4/3)](5/4)](7/6)]...(k+1)/k]..., k>0 (mod 5), where [x] = floor of x; this infinite nested floor product will eventually level-off at a(n).
%e A073362 a(1)=1 since (1/5)[[[[1(2/1)](3/2)](4/3)](5/4)]=1
%t A073362 f[n_] := Block[{k = 1, p = n}, While[q = Floor[p*(k + 1)/k]; q != p, p = q; k++; If[ Mod[k, 5] == 0, k++ ]]; p/5]; Table[ f[n], {n, 1, 37}] (* _Robert G. Wilson v_ *)
%Y A073362 Cf. A073359, A073360, A073361.
%K A073362 easy,nonn
%O A073362 1,2
%A A073362 _Paul D. Hanna_, Jul 29 2002
%E A073362 More terms from _Robert G. Wilson v_, Dec 27 2003