?(#>0&)]},{n,2500}]},Join[{0}, Transpose[Table[SelectFirst[cbs,#[[2]]==i&],{i,2,10}]][[1]]]] (* The program uses the SelectFirst function from Mathematica version 10 *) (* _Harvey P. Dale - cp's OEIS frontend

User: ?(#>0&)]},{n,2500}]},Join[{0}, Transpose[Table[SelectFirst[cbs,#[[2]]==i&],{i,2,10}]][[1]]]] (* The program uses the SelectFirst function from Mathematica version 10 ) ( _Harvey P. Dale

?(#>0&)]},{n,2500}]},Join[{0}, Transpose[Table[SelectFirst[cbs,#[[2]]==i&],{i,2,10}]][[1]]]] (* The program uses the SelectFirst function from Mathematica version 10 *) (* _Harvey P. Dale's wiki page.

?(#>0&)]},{n,2500}]},Join[{0}, Transpose[Table[SelectFirst[cbs,#[[2]]==i&],{i,2,10}]][[1]]]] (* The program uses the SelectFirst function from Mathematica version 10 *) (* _Harvey P. Dale has authored 0 sequences.