login
A122507
Triangle in which row n contains the first n terms of A018805.
1
1, 1, 3, 1, 3, 7, 1, 3, 7, 11, 1, 3, 7, 11, 19, 1, 3, 7, 11, 19, 23, 1, 3, 7, 11, 19, 23, 35, 1, 3, 7, 11, 19, 23, 35, 43, 1, 3, 7, 11, 19, 23, 35, 43, 55, 1, 3, 7, 11, 19, 23, 35, 43, 55, 63, 1, 3, 7, 11, 19, 23, 35, 43, 55, 63, 83
OFFSET
1,3
COMMENTS
Sequence B is called a reluctant sequence of sequence A, if B is triangle array read by rows: row number k coincides with first k elements of the sequence A. Sequence A122507 is the reluctant sequence of A018805. - Boris Putievskiy, Dec 14 2012
LINKS
FORMULA
a(n) = A018805(m), where m = n-t(t+1)/2, t = floor((-1+sqrt(8*n-7))/2). - Boris Putievskiy, Dec 14 2012
EXAMPLE
1
1, 3
1, 3, 7
1, 3, 7, 11
1, 3, 7, 11, 19
1, 3, 7, 11, 19, 23
MATHEMATICA
a1 = Table[ FoldList[ Plus, 1, 2 Array[ EulerPhi, n, 2 ] ], {n, 0, 10}] Flatten[a1]
Module[{nn=20, ep}, ep=Accumulate[2*EulerPhi[Range[nn]]]-1; Table[Take[ep, n], {n, nn}]]// Flatten (* Harvey P. Dale, May 24 2023 *)
CROSSREFS
Cf. A018805.
Sequence in context: A152903 A377342 A226522 * A257258 A259325 A094250
KEYWORD
nonn,tabl
AUTHOR
Roger L. Bagula, Sep 15 2006
EXTENSIONS
Edited by N. J. A. Sloane, Jun 16 2007
STATUS
approved