OFFSET
1,4
LINKS
Michel Lagneau, Table of n, a(n) for n = 1..10000
MAPLE
A247254 := proc(n)
option remember;
local a48 ;
if n=1 then
0;
else
a48 := A004648(n-1) ;
if procname(n-1) >= a48 then
procname(n-1)-a48 ;
else
procname(n-1)+a48 ;
end if;
end if;
end proc: # R. J. Mathar, Dec 02 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Lagneau, Nov 30 2014
STATUS
approved