A383727 Main diagonal of A383726.

30, 6279, 8970, 2532915, 3327870

Offset

3,1

Links

Table of n, a(n) for n=3..7.

Formula

a(n) = A383726(n,n-2).

Mathematica

A383726[n_] := Module[{m = Times @@ Prime[Range[n]] - 1}, Do[While[Length[#] != n || Total[Most[#]] != Last[#] & [FactorInteger[++m][[All, 1]]]], n-2]; m];
Array[A383726, 5, 3]

Crossrefs

Cf. A383726.

Sequence in context: A050984 A169686 A184889 * A358481 A300147 A087216

Adjacent sequences: A383724 A383725 A383726 * A383728 A383729 A383730

Keyword

nonn,hard,more

Author

Paolo Xausa, May 08 2025

Status

approved