|
|
|
|
2, 3, 7, 13, 61, 181, 1261, 2521, 7561, 37801, 415801, 1247401, 16216201, 113513401, 567567001, 1135134001, 19297278001, 57891834001, 1099944846001, 5499724230001, 38498069610001, 423478765710001, 9740011611330001
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
a(n) = (a(n-1) - 1) * A006530(n) + 1 for n>1, a(1) = 0;
|
|
MATHEMATICA
|
FoldList[Times, Array[FactorInteger[#][[-1, 1]] &, 30]] + 1 (* Amiram Eldar, Apr 08 2024 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|