1，3

哈里J.史密斯，n=1..200的n，a（n）表

a（6）=36是三角形数，3和6也是三角形数。

选择[FromDigits/@Tuples[{0，1，3，6}，8]，IntegerQ[（Sqrt[8#+1]-1）/2]&](*哈维·P·戴尔2011年11月5日*）

（PARI）TD（x）={返回（x==0 | | x==1 | | x==6）}{n=t=0；对于（m=0，10^9，t+=m；x=t；TD=1；而（x>9，d=x-10*（x\10）；如果（！TD（d），TD=0；break）；x\=10）；if（TD&&TD（x），写入（“b062100.txt”，n++，“”，t）；if（n==200，break））}\\哈里J.史密斯2009年8月1日

囊性纤维变性。217 00 A00.

上下文顺序：邮编：A151376 A066245号 A068821号*A262242 A317361型 A048089号

相邻序列：A062097号 A062098号 A062099号*A062101型 A062102号 A062103型

不,基础,容易的

阿玛纳特·穆尔蒂2001年6月16日

由Larry Reeves（larryr（AT）acm.org）更正和扩展，2001年6月22日

偏移量校正者哈里J.史密斯2009年8月1日

更多条款来自哈维·P·戴尔2011年11月5日

经核准的