A083141 Main diagonal of array in A083140.

2, 9, 35, 91, 209, 377, 629, 817, 1219, 1769, 2201, 2923, 3649, 4343, 5029, 5989, 7729, 8479, 10117, 11573, 12629, 14299, 16019, 17711, 21631, 23129, 24617, 26857, 28667, 30623, 35687, 38383, 42607, 44063, 50213, 52699, 56363, 60799, 63961, 68681

Offset: 1

Author

Yasutoshi Kohmoto, Jun 05 2003

Keywords

• nonn

Crossrefs

Cf. A083140.

Programs

Mathematica

Table[ Prime[n]*Prime[2n - 2], {n, 2, 41}]

PARI

vector(50, n, if (n==1, 2, prime(n)*prime(2*n-2))) \\ Michel Marcus, Dec 19 2014

Formula

a(n) = prime(n)*prime(2*n-2).

Extensions

Edited and extended by Robert G. Wilson v, Jun 11 2003