login
A380804
a(n) = floor(A001622*A007064(n)).
2
1, 6, 11, 14, 19, 22, 27, 32, 35, 40, 43, 48, 53, 56, 61, 66, 69, 74, 77, 82, 87, 90, 95, 100, 103, 108, 111, 116, 121, 124, 129, 132, 137, 142, 145, 150, 155, 158, 163, 166, 171, 176, 179, 184, 189, 192, 197, 200, 205, 210, 213, 218, 221, 226, 231, 234, 239, 244, 247, 252
OFFSET
1,2
MATHEMATICA
Floor[#*Floor[Range[100]*(1 + #) - #/2]] & [GoldenRatio]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Paolo Xausa, Feb 04 2025
STATUS
approved