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.

A117330 a(n) is the determinant of the 3 X 3 matrix with entries the 9 consecutive primes starting with the n-th prime.

This page as a plain text file.
%I A117330 #29 Jan 26 2021 10:23:06
%S A117330 -78,20,-36,36,-40,-96,96,-480,-424,520,348,100,-540,144,-144,-712,
%T A117330 240,96,480,-1120,-468,-1152,-3384,1404,-576,-3924,7884,-1548,-7312,
%U A117330 6288,-1828,-528,-768,1920,720,768,-1920,2400,-944,-9340,12588,15540,-864,5600,4124,-13668,-1428,1552
%N A117330 a(n) is the determinant of the 3 X 3 matrix with entries the 9 consecutive primes starting with the n-th prime.
%C A117330 The first term -78 is 6 mod 12 but all subsequent terms are 0,4,8 mod 12. Checked out to n=10000. A117329 is the subsequence formed by taking every 9th term.
%C A117330 The smallest absolute value of the sequence is 0.
%H A117330 Harvey P. Dale, <a href="/A117330/b117330.txt">Table of n, a(n) for n = 1..1000</a>
%F A117330 a(A117345(n)) = 0. - _Hugo Pfoertner_, Jan 26 2021
%e A117330 a(3)=-36 = det([[5,7,11],[13,17,19],[23,29,31]]).
%p A117330 primedet := proc(n) local L; L:=map(ithprime,[$n..n+8]); linalg[det]([L[1..3],L[4..6],L[7..9]]) end;
%t A117330 Table[Det[Partition[Prime[Range[n,n+8]],3,3]],{n,50}] (* _Harvey P. Dale_, May 16 2019 *)
%o A117330 (PARI) a(n) = matdet(matrix(3,3,i,j,prime((n+j-1)+3*(i-1)))); \\ _Michel Marcus_, Jan 25 2021
%Y A117330 Cf. A117329, A117345, A118799, A118815, A340869.
%K A117330 easy,sign
%O A117330 1,1
%A A117330 _Cino Hilliard_ and _Walter Kehowski_, Apr 24 2006
%E A117330 Edited by _N. J. A. Sloane_ at the suggestion of _Stefan Steinerberger_, Jul 14 2007