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 A144769 #9 Oct 17 2015 16:26:29 %S A144769 0,1,1,2,3,4,5,6,7,9,10,12,13,14,15,17,19,20,22,23,24,26,27,29,32,33, %T A144769 34,35,36,37,42,43,45,46,49,50,52,54,55,57,59,60,63,64,65,66,70,74,75, %U A144769 76,77,79,80,83,85,87,89,90,92,93,94,97,102,103,104,105,110,112,115,116 %N A144769 a(n) = floor(prime(n)/3). %F A144769 a(n) = floor(A000040(n)/3). - _R. J. Mathar_, Sep 21 2008 %p A144769 A144769 := proc(n) floor(ithprime(n)/3); end; # _R. J. Mathar_, Sep 21 2008 %t A144769 Quotient[Prime[Range[5! ]],3] %o A144769 (PARI) a(n)=prime(n)\3 \\ _Charles R Greathouse IV_, Oct 05 2011 %Y A144769 See A130290 for prime(n)/2 or A075518 for prime(n)/4. %K A144769 nonn,easy %O A144769 1,4 %A A144769 _Vladimir Joseph Stephan Orlovsky_, Sep 20 2008 %E A144769 Edited by _R. J. Mathar_, Sep 21 2008