

A262096


Triangle read by rows: numbers c from the set of arithmetic triples a<b<c (three numbers in arithmetic progression) where a and b are members of A005836.


3



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, 56, 55, 53, 52, 47, 46, 44, 43, 29, 60, 59, 57, 56, 51, 50, 48, 47, 33, 32, 62, 61, 59, 58, 53, 52, 50, 49, 35, 34, 32
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

The first term in each row of the triangle is a member of A005823; these are also the local maxima. From this term until the next row, the first differences are A236313.


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, n1)); for (n=2, #oks, for (k=1, n1, print1(2*oks[n]oks[k], ", "); ); ); } \\ Michel Marcus, Sep 12 2015


CROSSREFS

Cf. A005823, A005836, A074940, A236313, A262097, A262256.
Sequence in context: A021083 A244928 A319016 * A011043 A021380 A195488
Adjacent sequences: A262093 A262094 A262095 * A262097 A262098 A262099


KEYWORD

nonn,look,tabl,base


AUTHOR

Max Barrentine, Sep 10 2015


EXTENSIONS

Name corrected by Max Barrentine, May 24 2016


STATUS

approved



