A102889-OEIS公司

A102889年

体积为n的积分长方体的最小空间对角线的平方。

3, 6, 11, 9, 27, 14, 51, 12, 19, 30, 123, 17, 171, 54, 35, 24, 291, 22, 363, 33, 59, 126, 531, 29, 51, 174, 27, 57, 843, 38, 963, 36, 131, 294, 75, 34, 1371, 366, 179, 45, 1683, 62, 1851, 129, 43, 534, 2211, 41, 99, 54, 299, 177, 2811, 54, 147, 69, 371, 846, 3483 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,1`
	评论	`a（n）=A102095号（n） ^2个+A102096号（n） ^2个+1997年10月（n） ^2。当n是立方体时，天花板（3*n^（2/3））<=a（n）<=2+n^2 a（n。a（n）=2+n^2当n是素数时。`
	链接	`n=1..59时的n，a（n）表。` `埃里克·魏斯坦的数学世界，长方体.`
	例子	`a（4）=9，因为体积4的最小空间二对角积分长方体的尺寸是2乘2乘1，2^2+2^2+1^2=9。`
	数学	清除[surfarea，sumprint，temp，fac，faclist，red，bool，n，a，b，c，i，ai，bi，ci]red[n_]：=减少[{abc==n，a>=b>=c>0}，{a，b、c}，Integers]；faclist[n_]：=（如果[PrimeQ[n]\|\|n==1，Return[{n+1+1，{n，1，1}}]；中止[]]；bool=red[n]；收获[For[i=1，i<=长度[bool]，i++，ai=bool[i]][[2]]；bi=bool[[i]][2]]，{ai，bi，ci}}]]][[2]][[1]]）fac[n_]：=（如果[PrimeQ[n]\|\|n==1，返回[{n，1，1}]；中止[]]；faclist[n][1]][2]]）表面面积[n_]：=（清除[temp]；temp=fac[n]；2temp[[1]]^2+2temp[2]]^2）表[surfarea[n]/2，{n，1，85}]
	交叉参考	`囊性纤维变性。A102890号.` `上下文中的序列：A325551型 A258928型 A144562号A183543号 A256108型 A028744号` `相邻序列：A102886号 A102887号 2008年10月A102890号 A102891号 A102892号`
	关键词	`非n`
	作者	`Joseph Biberstine（jrbibers（AT）indiana.edu），2005年1月16日`
	状态	`经核准的`