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.

A051512 a(n) = floor(tan(prime(n))).

This page as a plain text file.
%I A051512 #19 Sep 11 2020 12:06:45
%S A051512 -3,-1,-4,0,-226,0,3,0,1,0,-1,-1,0,-2,-1,-1,-1,3,1,-4,0,0,3,1,-1,0,-1,
%T A051512 0,-2,-1,4,-2,-3,0,4,0,-1,-1,0,0,-1,-3,-1,4,-2,1,0,-1,1,-1,0,0,-2,-1,
%U A051512 -1,-2,-3,1,0,5,0,1,-2,-1,-3,-1,2,1,6,0,2,1,-1,-2,-3,-1,-1,2,-3,0,2,0,0,-1,-2,0,-1,9,-2,2,-2,10
%N A051512 a(n) = floor(tan(prime(n))).
%H A051512 Matt Parker, <a href="https://youtu.be/A7eJb8n8zAw">What is the biggest tangent of a prime?</a>, Channel Stand-up Maths, YouTube, Aug 19 2020.
%F A051512 a(n) = A000503(prime(n)), i.e., this A051512 = A000503 o A000040. - _M. F. Hasler_, Sep 10 2020
%t A051512 Table[Floor[Tan[Prime[n]]], {n, 100}] (* _Wesley Ivan Hurt_, Mar 28 2015 *)
%o A051512 (PARI) apply( A051512(n)=tan(prime(n))\1, [1..77]) \\ _M. F. Hasler_, Sep 10 2020
%Y A051512 Cf. A000503, A000040, A088306, A249836.
%K A051512 sign
%O A051512 1,1
%A A051512 _N. J. A. Sloane_