1，1

n=1..105的n，a（n）表。

b=实数[N[1/Pi，1000]]；b=第一[b]；a={}；Do[k=b[[n+1]]-b[[n]]；如果[k<0，AppendTo[a，-1]，如果[k==0，AppendTo[a，0]，AppendTo[a，1]]]，{n，11999}]；a（*Artur Jasinski*）

其中[#[[2]]<#[[1]]，-1，#[[2]]==[[1]]，0，真，1]&/@Partition[realdights[1/Pi，10，110][[1]]，2，1](*哈维·P·戴尔2013年8月9日*）

囊性纤维变性。A049541号,邮编：A138344.

上下文顺序：邮编：A157972 邮编：A124897 A071035型*A014590号 A015171型 A014562号

相邻序列：邮编：A138342 邮编：A138343 邮编：A138344*邮编：A138346 邮编：A138347 邮编：A138348

签名,基础

雅辛斯基2008年3月16日

经核准的