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.
%I A127719 #6 Aug 18 2015 00:08:55 %S A127719 2,3,6,9,14,19,25,32,39,48,57,68,80,90,102,115,129,143,158,173,187, %T A127719 203,220,237,256,275,294,313,331,350,372,394,418,440,465,488,513,538, %U A127719 564,590,616,642,670,697,724,751,780,811,843,873 %N A127719 Floor of square root of sum of squares of n consecutive primes. %F A127719 a(n) = A000196(A024450(n)). - _R. J. Mathar_, Jan 28 2007 %p A127719 A024450 := proc(n) local i; add((ithprime(i))^2,i=1..n); end: A000196 := proc(n) floor(sqrt(n)); end: A127719 := proc(n) A000196(A024450(n)); end: for n from 1 to 30 do printf("%d, ",A127719(n)); od; # _R. J. Mathar_, Jan 28 2007 %t A127719 a = {}; k = 0; Do[k = k + (Prime[x])^2; AppendTo[a, Floor[Sqrt[k]]], {x, 1, 50}]; a %Y A127719 Cf. A127720, A127721. %K A127719 nonn %O A127719 1,1 %A A127719 _Artur Jasinski_, Jan 25 2007