OFFSET
1,1
LINKS
Paolo Xausa, Table of n, a(n) for n = 1..10000
MATHEMATICA
Array[#^2 + Block[{q = Floor[# * GoldenRatio]}, q * (q + 1)] &, 100]
PROG
(Python)
from math import isqrt
def A371382(n): return n**2+(q:=n+isqrt(5*n**2)>>1)*(q+1) # Chai Wah Wu, Mar 21 2024
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Paolo Xausa, Mar 20 2024
STATUS
approved