OFFSET
1,2
COMMENTS
a(2n) is the smallest number that has not occurred earlier and a(2n+1) is the smallest number (again not included earlier) required to satisfy the requirement. Another permutation of natural numbers.
PROG
(GAP) sq := List([1..100], x->x^2); l := [1]; k := 2;
repeat m := Minimum(Difference([1..Size(l)+1], l)); Add(l, m);
sum := Sum(List([k..2*k-2], x->l[x]));
m := sq[PositionProperty(sq, x->x>sum and not x-sum in l)]-sum;
Add(l, m); k := k+1;
until k = 50; l; - Simon Nickerson (simonn(AT)maths.bham.ac.uk), Jun 29 2005
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy and Meenakshi Srikanth (menakan_s(AT)yahoo.com), Apr 23 2003
EXTENSIONS
More terms from Simon Nickerson (simonn(AT)maths.bham.ac.uk), Jun 29 2005
STATUS
approved