A076977 Product of the largest prime divisors of composite numbers between successive primes.

1, 2, 3, 30, 3, 70, 3, 385, 4095, 5, 7854, 1235, 7, 1265, 23205, 127281, 5, 62062, 2737, 3, 502645, 615, 1632323, 124158255, 385, 17, 4823, 3, 2849, 24662087802577225, 1118, 1190255, 23, 499504581303, 5, 1431859, 1444515, 37433, 1263899, 11725483

Offset: 1

Author

Amarnath Murthy, Oct 23 2002

Keywords

• nonn

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A076976.

Programs

Mathematica

plpd[l_]:=Times@@(FactorInteger[#][[-1,1]]&/@l); plpd/@(Range[#[[1]]+1, #[[2]]-1]&/@Partition[Prime[Range[50]],2,1]) (* Harvey P. Dale, Sep 02 2020 *)

Extensions

More terms from Sascha Kurz, Jan 22 2003