|
|
A086283
|
|
a(1)=1, a(2)=1 and, for n>2, a(n) is the smallest positive integer such that the sequence of second order absolute difference is the sequence of positive integers {1,2,3,4,...}.
|
|
3
|
|
|
1, 1, 2, 5, 5, 1, 10, 7, 17, 15, 4, 3, 15, 15, 2, 29, 17, 45, 34, 5, 15, 45, 36, 5, 13, 45, 38, 5, 11, 45, 40, 5, 1, 37, 34, 71, 69, 31, 30, 69, 69, 29, 110, 71, 153, 27, 108, 73, 155, 25, 106, 75, 157, 23, 104, 77, 159, 21, 102, 79, 161, 19, 100, 81, 163, 17, 98, 83, 1, 15, 98
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
COMMENTS
|
A085059 is the smallest positive sequence such that the first order absolute difference is {1,2,3,4,...}. Other related sequences may be found by searching for the words "absolute difference" with the "Lookup" facility.
|
|
LINKS
|
|
|
EXAMPLE
|
For the initial terms, no smaller positive terms work than
Sequence {a(n)}: 1,1,2,5,5,1,10,7,17,15,4,3,...
First absolute difference: 0,1,3,0,4,9,3,10,2,11,1,...
Second absolute difference: 1,2,3,4,5,6,7,8,9,10,...
|
|
PROG
|
(Haskell)
a086283 n = x086283_list !! (n-1)
a086283_list = 1 : 1 : f 1 0 [1..] where
f x y (z:zs) = u : f u (abs $ x - u) zs where
u = minimum [if v < x then x - v else x + v |
v <- if y < z then [y + z] else [y + z, y - z]]
|
|
CROSSREFS
|
Cf. A008344 (absolute differences).
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|