搜索: a062892-编号:a062893
|
|
|
|
0, 1, 4, 9, 16, 25, 36, 49, 64, 81, 121, 225, 289, 324, 361, 484, 529, 576, 676, 729, 784, 841, 1156, 1225, 1444, 1521, 1681, 1849, 2116, 2209, 2601, 2704, 3025, 3136, 3249, 3364, 3481, 3721, 3844, 3969, 4225, 4356, 4489, 4624, 5041, 5184, 5329, 5476
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,3
|
|
链接
|
|
|
黄体脂酮素
|
(Python)
从数学导入isqrt
从sympy.utilities.iterables将multiset_permutations导入为mp
定义sqr(n):返回isqrt(n)**2==n
def ok(正方形):
s=str(方形)
perms=(int(“”.join(p))表示mp中的p,len(s))
return len(set(p for p in perms if sqr(p))==1
def aupto(limit):返回[k*k表示范围内的k(isqrt(limit)+1),如果正常(k*k)]
|
|
交叉参考
|
|
|
关键词
|
非n,基础
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
A068805号
|
| 假设整数m有k个十进制数字;列出k!以所有可能的方式排列数字获得的字符串;丢弃任何前导零;计算列表中不同的方块数(A062892号); a(n)=产生n个平方的最小m。 |
|
+20 1
|
|
|
1, 100, 169, 10269, 13468, 10044, 100269, 1000269, 10069, 100069, 1001466, 1000044, 10012689, 10045669, 10001466, 1003468, 10023469, 1000069, 10000069, 10002456, 10003468, 100045669, 100023469, 100001466, 100124469, 100045678, 100345689, 100023489, 100000069, 100002456
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
链接
|
|
|
例子
|
a(3)=169,其3个排列169、196和961产生三个不同的正方形。
|
|
数学
|
a=表[0,{15}];Do[b=Count[IntegerQ/@Sqrt[FromDigits/@Permutations[Integer Digits[n]]],True];如果[b<15&&a[b]]==0,a[[b]=n],{n,1287618}](*罗伯特·威尔逊v2003年5月22日*)
|
|
交叉参考
|
|
|
关键词
|
基础,非n
|
|
作者
|
|
|
扩展
|
a(13)-a(20)来自约翰·莱曼2004年9月27日
|
|
状态
|
经核准的
|
|
|
|
|
|
|
10, 18, 40, 46, 52, 61, 63, 90, 94, 106, 108, 112, 136, 148, 160, 163, 180, 184, 205, 211, 234, 243, 250, 252, 259, 265, 279, 295, 297, 298, 306, 316, 342, 360, 406, 409, 414, 418, 423, 432, 448, 460, 478, 481, 487, 490, 502, 520, 522, 526, 562, 567, 592
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
链接
|
|
|
配方奶粉
|
|
|
数学
|
选择[范围[600]!IntegerQ[Sqrt[#]]&&AnyTrue[FromDigits/@Permutations[IntegerDigits[#]],IntegerQ[Sqrt[#]&]&](*需要Mathematica版本10或更高版本*)(*哈维·P·戴尔2020年8月17日*)
|
|
黄体脂酮素
|
(Python)
从数学导入isqrt
从sympy.utilities.iterables将multiset_permutations导入为mp
定义sqr(n):返回isqrt(n)**2==n
定义正常(n):
如果sqr(n):返回False
s=str(n)
对于mp(s,len(s)中的p,返回任意(sqr(int(“”.join(p)))
打印([k代表范围(600)中的k,如果正常(k)])#迈克尔·布拉尼基2021年10月18日
|
|
交叉参考
|
|
|
关键词
|
非n,基础
|
|
作者
|
R.穆勒
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|
|
|
|
2, 3, 5, 6, 7, 8, 11, 12, 13, 14, 15, 17, 19, 20, 21, 22, 23, 24, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 37, 38, 39, 41, 42, 43, 44, 45, 47, 48, 50, 51, 53, 54, 55, 56, 57, 58, 59, 60, 62, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 82, 83, 84, 85, 86, 87
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
|
|
链接
|
|
|
例子
|
134=2*67、143=11*13、314=2*157、341=11*31、413=7*59和431=A000040型(83),因此134、143、314、341、413和431是术语。
|
|
数学
|
选择[Range[100],NoneTrue[Sqrt[#]&/@(FromDigits/@Permutations[IntegerDigits[#]]),IntegerQ]&](*哈维·P·戴尔2022年12月4日*)
|
|
交叉参考
|
|
|
关键词
|
非n,容易的,基础
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
A096598号
|
| 正方形,使得某些数字的排列也是正方形(在十进制表示中)。 |
|
+10 2
|
|
|
100, 144, 169, 196, 256, 400, 441, 625, 900, 961, 1024, 1089, 1296, 1369, 1600, 1764, 1936, 2025, 2304, 2401, 2500, 2809, 2916, 3600, 4096, 4761, 4900, 6400, 7056, 8100, 9025, 9216, 9604, 9801, 10000, 10201, 10404, 10609, 10816, 11025
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
|
|
链接
|
|
|
例子
|
1024=32^2和2401=49^2,因此1024(和2401)是一个术语。
|
|
交叉参考
|
|
|
关键词
|
非n,基础
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.005秒内完成
|