OFFSET
1,1
COMMENTS
LINKS
Max Barrentine, Table of n, a(n) for n = 1..2016
EXAMPLE
Each term is generated from arithmetic sequences started from pairs of terms from A005836. The order is according to the arithmetic triples 0, 1, a(1)=2; 0, 3, a(2)=6; 1, 3, a(3)=5; 0, 4, a(4)=8; 1, 4, a(5)=7; 3, 4, a(6)=5; ...
As a triangle, sequence starts:
2;
6, 5;
8, 7, 5;
18, 17, 15, 14;
20, 19, 17, 16, 11;
24, 23, 21, 20, 15, 14;
26, 25, 23, 22, 17, 16, 14;
54, 53, 51, 50, 45, 44, 42, 41;
...
PROG
(PARI) isok(n) = (n==0) || (vecmax(digits(n, 3)) != 2);
lista(nn) = {oks = select(x->isok(x), vector(nn, n, n-1)); for (n=2, #oks, for (k=1, n-1, print1(2*oks[n]-oks[k], ", "); ); ); } \\ Michel Marcus, Sep 12 2015
CROSSREFS
AUTHOR
Max Barrentine, Sep 10 2015
EXTENSIONS
Name corrected by Max Barrentine, May 24 2016
STATUS
approved