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.

A064488 A Beatty sequence: Floor[n*c], where c = A064648 is the sum of the reciprocals of primorials.

This page as a plain text file.
%I A064488 #12 Apr 13 2014 10:46:22
%S A064488 0,1,2,2,3,4,4,5,6,7,7,8,9,9,10,11,11,12,13,14,14,15,16,16,17,18,19,
%T A064488 19,20,21,21,22,23,23,24,25,26,26,27,28,28,29,30,31,31,32,33,33,34,35,
%U A064488 35,36,37,38,38,39,40,40,41,42,43,43,44,45,45,46,47,47,48,49,50,50,51,52
%N A064488 A Beatty sequence: Floor[n*c], where c = A064648 is the sum of the reciprocals of primorials.
%H A064488 <a href="/index/Be#Beatty">Index entries for sequences related to Beatty sequences</a>
%t A064488 With[{nn=80},Floor[Times@@#]&/@Thread[{Range[nn],Accumulate[1/Rest[ FoldList[Times,1,Prime[Range[nn]]]]]}]] (* _Harvey P. Dale_, Apr 13 2014 *)
%Y A064488 Cf. A002110, A064646-A064648.
%K A064488 nonn
%O A064488 1,3
%A A064488 _Labos Elemer_, Oct 04 2001