A290647-OEIS公司

A290647型

a（n）是n^2在十进制表示的正整数串接中第一次出现的位置。

1, 4, 9, 22, 40, 62, 88, 83, 27, 190, 14, 322, 397, 478, 565, 658, 757, 37, 299, 1090, 323, 86, 777, 141, 660, 124, 783, 1325, 443, 2590, 479, 2986, 3246, 3514, 3790, 4074, 4366, 4666, 346, 5290, 394, 5946, 6286, 6634, 6990, 3541, 7261, 8106, 3851, 8890, 3931, 9706, 10126, 5408, 9012, 4345, 8865, 981, 4283, 13290, 4379

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1,2

链接

Michael S.Branicky，n=1..10000时的n，a（n）表（杨志宁提供的条款1..1000）

例子

s=12345678910111213141516171819202122324252627282930313233343536。

a（4）=22，因为4^2=16 in s的第一次出现是从第22位开始的。

数学

t=“”；k=0；表[While[（z=StringPosition[t，ToString[n^2]，1]）=={}，t=t<>ToString++k]]；z[1,1]]，{n，61}](*乔瓦尼·雷斯塔2017年8月11日*）

模块[{nn=15000，s}，s=Flatten[Integer Digits/@Range[nn]]；扁平[Table[SequencePosition[s，IntegerDigits[n^2]，1]，{n，70}]，1]][[All，1][（*需要Mathematica版本10或更高版本*）(*哈维·P·戴尔2021年7月5日*）

黄体脂酮素

（VBA）

子测试（）

尺寸（&t）$

i=1至10000

t=t&i

下一步

对于i=1到100

调试。打印InStr（t，i^2）；", ";

下一步

结束Sub

交叉参考

囊性纤维变性。A031297号,A290787型.

上下文中的序列：A041743号 A041943号 A158140型*A105314号 A200155型 A002835号

相邻序列：A290644型 A290645型 A290646型*A290648型 A290649型 A290650型

关键词

非n,看,基础

作者

杨志宁2017年8月8日

状态

经核准的