|
| |
|
|
A080704
|
|
a(1)=2; for n>1, if n is in the sequence then a(n) is the smallest even integer >a(n-1), otherwise a(n)=a(n-1)+3.
|
|
2
| |
|
|
2, 4, 7, 8, 11, 14, 16, 18, 21, 24, 26, 29, 32, 34, 37, 38, 41, 42, 45, 48, 50, 53, 56, 58, 61, 62, 65, 68, 70, 73, 76, 78, 81, 82, 85, 88, 90, 92, 95, 98, 100, 102, 105, 108, 110, 113, 116, 118, 121, 122, 125, 128, 130, 133, 136, 138, 141, 142, 145, 148
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
FORMULA
| It seems that a(n)/n ->2.4799....=62/25 ?
|
|
|
PROG
| (PARI) for(n=2, 400, an[n]=if(setsearch(Set(vector(n-1, i, a(i))), n), if(a(n-1)%2, a(n-1)+1, a(n-1)+2), a(n-1)+3))
|
|
|
CROSSREFS
| Cf. A080705, A064437, A080717.
Sequence in context: A187575 A074204 A030355 * A162158 A018552 A030773
Adjacent sequences: A080701 A080702 A080703 * A080705 A080706 A080707
|
|
|
KEYWORD
| nonn,easy
|
|
|
AUTHOR
| Benoit Cloitre, Mar 01, 2003
|
| |
|
|
