OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
Table begins:
2, 3;
2, 3, 5;
2, 3, 5, 7, 11;
2, 3, 5, 7, 11, 13, 17;
2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31;
2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41;
...
MATHEMATICA
m = 8; p = Array[Prime, Prime[m]]; Join @@ (p[[1 ;; p[[#]]]] & /@ Range[m]) (* Amiram Eldar, Sep 24 2019 *)
Table[Take[Prime[Range[Prime[n]]], n], {n, Prime[Range[10]]}]//Flatten (* Harvey P. Dale, Oct 30 2021 *)
CROSSREFS
KEYWORD
nonn,tabf
AUTHOR
Frederick John Bernet III, Sep 15 2019
STATUS
approved