%I#15 2019年4月7日00:00:45

%S 1,2,3,5,7,4,6,11,9,13,17,17,19,8,23,10,12,25,21,29,27,27,31,37,41,16,43,14，

%电话：47,15,18,35,33,53,39,59,22,49,61,67,26,71,20,73,45,79,24,28,51,55,57，

%U 77,83,32,89,65,97,95101,46103,34,69,85,63,38,81,40,36,91,75107109113,4412711519121,87号

%N按行读取的三角形，其中第N行包含N个不同的数字（之前没有出现），因此每个条目在所有方向上都与其相邻条目互素。

%H Alois P.Heinz，<a href=“/A082196/b082196.txt”>行n=1..141，扁平</a>

%e三角形开始

%e 1；

%e 2、3；

%e五、七、四；

%e第6、11、9、13条；

%e 17、19、8、23、10；

%e。。。

%e a（4,2）=11。它的8个邻居是5、7、4、9、8、19、17和6，它们与11互素。

%p ina:=proc（）假端：mina:=2：

%p T:=proc（n，k）选项记忆；全球mina；局部t；

%p如果n<2或k<1或k>n，则为1

%p else表示来自mina的t，而ina（t）或[1$4]<>map（x->igcd（x，t），

%p（T（n-1，k-1），T（n-1，k），T

%p做od；ina（t）：=真；

%p，而ina（mina）做mina：=mina+1od；

%价格

%p菲

%p端：

%p序列（序列（T（n，k），k=1..n），n=1..15）；#_Alois P.Heinz，2011年9月10日

%t ina[_]=假；mina=2；T[n_，k_]：=T[n，k]=如果[n<2||k<1||k>n，1，对于[T=mina，ina[T]||数组[1&，4]！=地图[GCD[#，t]&，列表[t[n-1，k-1]，t[n-l，k]，t[1，k+1]，t[n，k-1]]，t++]；ina[t]=正确；而[ina[mina]，mina=mina+1]；t] ；表[表[T[n，k]，{k，1，n}]，{n，1，15}]//Flatten（*_Jean-François Alcover_，2015年3月9日，在_Alois P.Heinz_*之后）

%Y参考A082197、A082198和A082199。

%K nonn，表

%O 1、2

%A _Amarnath Murthy，2003年4月7日

%E更多条款，来自Antonio G.Astudillo（afg_Astudillo（AT）lycos.com），2003年4月20日