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.

A078721 a(n) = prime(n*(n+1)/2 + 1).

This page as a plain text file.
%I A078721 #36 Apr 18 2025 21:02:45
%S A078721 2,3,7,17,31,53,79,109,157,199,263,331,401,479,577,661,773,887,1021,
%T A078721 1153,1297,1459,1609,1787,1993,2161,2377,2609,2797,3041,3313,3547,
%U A078721 3803,4079,4363,4663,4987,5309,5647,5953,6311,6689,7027,7481,7841,8263,8689
%N A078721 a(n) = prime(n*(n+1)/2 + 1).
%C A078721 Primes on the left side of the triangle formed by listing successively the prime numbers in a triangular grid:
%C A078721               2
%C A078721             3   5
%C A078721           7  11  13
%C A078721        17  19  23  29
%C A078721      31  37  41  43  47
%C A078721    53  59  61  67  71  73
%C A078721 The sum of the reciprocals appears to converge.
%C A078721 As the terms grow faster than the triangular numbers and the sum of inverse numbers converges, the sum of inverses indeed converges. - _Joerg Arndt_, Oct 28 2015
%C A078721 When arranged as a rectangular array, every row eventually intersperses every other row and every column eventually intersperses every other column; see example. - _Clark Kimberling_, Apr 13 2025
%H A078721 Michael De Vlieger, <a href="/A078721/b078721.txt">Table of n, a(n) for n = 0..10000</a>
%F A078721 a(n) = A000040(A000124(n)). - _Altug Alkan_, Oct 28 2015
%F A078721 a(n) = A151800(A011756(n)) for n >= 1. - _Amiram Eldar_, Sep 05 2024
%e A078721     2     3     7    17    31    53    79   109   157   199
%e A078721     5    11    19    37    59    83   113   163   211   269
%e A078721    13    23    41    61    89   127   167   223   271   347
%e A078721    29    43    67    97   131   173   227   277   349   421
%e A078721    47    71   101   137   179   229   281   353   431   503
%e A078721    73   103   139   181   233   283   359   433   509   607
%e A078721   107   149   191   239   293   367   439   521   613   709
%e A078721   151   193   241   307   373   443   523   617   719   827
%e A078721   197   251   311   379   449   541   619   727   829   953
%e A078721   257   313   383   457   547   631   733   839   967  1087
%e A078721 Interspersion of rows 3 and 5 begins with
%e A078721   41  61  89  127...
%e A078721     43  67  97...
%e A078721 Interspersion of columns 3 and 5 begins with
%e A078721   19
%e A078721     31
%e A078721   41
%e A078721     59
%e A078721   67
%e A078721     89
%t A078721 Table[Prime[n (n + 1)/2 + 1], {n, 0, 46}] (* _Michael De Vlieger_, Oct 28 2015 *)
%t A078721 Prime[#]&/@(Accumulate[Range[0,50]]+1) (* _Harvey P. Dale_, Aug 04 2018 *)
%t A078721 Grid[Table[Prime[n + (n + k - 2) (n + k - 1)/2], {n, 1, 20}, {k, 1, 15}]]
%t A078721 (* _Clark Kimberling_, Apr 13 2025 *)
%o A078721 (PARI) a(n) = prime(n*(n+1)/2 + 1);
%o A078721 (Magma) [NthPrime(n*(n + 1) div 2+1): n in [0..50]]; // _Vincenzo Librandi_, Jun 08 2016
%Y A078721 Cf. A000040, A011756, A078722, A078723, A078724, A078725, A151800.
%Y A078721 Cf. A114537.
%K A078721 nonn,easy
%O A078721 0,1
%A A078721 _Cino Hilliard_, Dec 20 2002