A210762 Triangle read by rows in which row n lists the positive integers smaller than the currently largest number in Recamán's sequence A005132 after the n-th stage, but not yet present in Recamán's sequence.
2, 2, 4, 5, 4, 5, 4, 5, 4, 5, 8, 9, 10, 11, 12, 4, 5, 8, 9, 10, 11, 12, 14, 15, 16, 17, 18, 19, 4, 5, 8, 9, 10, 11, 14, 15, 16, 17, 18, 19, 4, 5, 8, 9, 10, 11, 14, 15, 16, 17, 18, 19, 4, 5, 8, 9, 10, 14, 15, 16, 17, 18, 19, 4, 5, 8, 9, 10, 14, 15, 16, 17
Offset: 2
Examples
Written as an irregular triangle: 2; 2, 4, 5; 4, 5; 4, 5; 4, 5, 8, 9, 10, 11, 12; 4, 5, 8, 9, 10, 11, 12, 14, 15, 16, 17, 18, 19; 4, 5, 8, 9, 10, 11, 14, 15, 16, 17, 18, 19; 4, 5, 8, 9, 10, 11, 14, 15, 16, 17, 18, 19; 4, 5, 8, 9, 10, 14, 15, 16, 17, 18, 19;
Programs
-
Maple
A210762 := proc(n) local L,maxa ; rec := [seq(A005132(j),j=0..n)] ; maxa := max(op(rec)) ; L := [] ; for i from 0 to maxa do if not member(i,rec) then L := [op(L),i] ; end if; end do; if nops(L) = 0 then return [0] ; end if; L ; end proc: seq(op(A210762(n)),n=1..11) ; # R. J. Mathar, Apr 01 2012
Comments