A085047-OEIS公司

A085047号

a（n）是尚未使用的最小数，使得前n个项的算术平均值是平方。

三

1, 7, 4, 24, 9, 51, 16, 88, 25, 135, 36, 192, 49, 259, 64, 336, 81, 423, 100, 520, 121, 627, 144, 744, 169, 871, 196, 1008, 225, 1155, 256, 1312, 289, 1479, 324, 1656, 361, 1843, 400, 2040, 441, 2247, 484, 2464, 529, 2691, 576, 2928, 625, 3175, 676, 3432, 729 (列表;图表;参考;听;历史;文本;内部格式)

	偏移	`1,2`
	评论	`这几乎是一个线性的重复，但清晰度要求有时会阻碍它-查尔斯·格里特豪斯四世2014年11月7日`
	链接	`阿洛伊斯·海因茨，n=1..10000时的n，a（n）表`
	配方奶粉	`a（2n-1）=n^2；a（2n）=n（2+5n）。此外，（1/（2n））（和{i=1..n}i^2+i（2+5i））=（n+1）^2和（1/。因此，前2n项的算术平均值为（n+1）^2，前21项的算术均值为n^2-德里克·奥尔2015年6月26日`
	例子	`（a（1）+a（2）+a（3）+a（4）+a（5））/5=（1+7+4+24+9）/5=9=3^2。`
	MAPLE公司	`b： =过程（n）为（n>1）结束：` `s： =proc（n）选项记忆；` `如果`（n=1，1，s（n-1）+a（n）） `结束时间：` `a： =proc（n）选项记忆；局部k；` `如果n=1，则为1` `否则k从n-irem（s（n-1），n）乘以n` `如果b（k）和issqr（（s（n-1）+k）/n）` `则b（k）：=假；返回k` `fi（菲涅耳）` `日` `fi（菲涅耳）` `结束时间：` `seq（a（n），n=1..150）#阿洛伊斯·海因茨2014年11月7日`
	数学	`清除[a，b，s]；b[n]：=n>1；s[n_]：=s[n]=如果[n==1，1，s[n-1]+a[n]]；a[n_]：=a[n]=模[{k}，如果[n==1，1，对于[k=n-Mod[s[n-1]，n]，为真，k=k+n，如果[b[k]&&IntegerQ[Sqrt[（s[n-1'+k）/n]]，b[k]=假；返回[k]]]]；表[a[n]，{n，1，150}](Jean-François Alcover公司2015年6月10日之后阿洛伊斯·海因茨)`
	黄体脂酮素	`（PARI）v=[1]；n=1；而（#v<50，s=（n+vecsum（v））/（#v+1）；if（类型==“t_INT”，if（平方）&&！vecsearch（vecsort（v），n），v=concat（v，n）；n=0））；n++）；v（v）\\德里克·奥尔2014年11月5日，2015年6月26日编辑`
	交叉参考	`囊性纤维变性。A168668号.` `上下文中的序列：A147601型 A075536号 A280336型A213831型 A282361号 A213564型` `相邻序列：A085044号 A085045型 A085046号A085048号 A085049号 A085050美元`
	关键词	`非n`
	作者	`阿玛纳斯·穆尔西2003年6月20日`
	扩展	`更多术语来自大卫·沃瑟曼，2005年1月11日` `删除了不正确的公式和程序查尔斯·格里特豪斯四世2014年11月7日`
	状态	`经核准的`