显示找到的15个结果中的1-10个。
1, 2, 4, 6, 8, 10, 12, 16, 18, 20, 24, 30, 36, 40, 42, 48, 58, 60, 72, 78, 80, 84, 90, 110, 114, 116, 120, 126, 144, 156, 168, 174, 180, 210, 220, 222, 228, 232, 234, 240, 252, 290, 312, 330, 336, 342, 348, 360, 390, 420, 440, 444, 456, 464, 468, 504, 522, 546
数学
选择[Range[600],Divisible[17^#^2-1,#^3]&](*哈维·P·戴尔2015年7月19日*)
交叉参考
囊性纤维变性。A129211号,A129212号,A177905号,A177907号,A127102型,A177909号,A177243号,A177911号,A177912号,A177913号,A177914号,A177915号,A177916号,A177918号,A177919号,A177920号.
囊性纤维变性。A127103型,A127104型,2005年12月1日,A127106型,A127107号,A127102型,A127101型,A127100型,A127092号, ...,A128397号.
1, 13, 2041, 8801, 1381757, 24355253, 249302027, 464754407, 2681233451, 16488506281, 16772956369, 39665616523, 72966441899, 168777472279, 388885239223, 420953651807, 2974921088191, 3487599163841
数学
加入[{1},选择[Range[2000000],PowerMod[14,#^2,#^3]==1&]](*罗伯特·普莱斯2020年3月31日*)
1, 19, 7805561, 1432001198261, 3661225986659, 58130944174609, 187470481770989
数学
加入[{1},选择[Range[10000000],PowerMod[20,#^2,#^3]==1&]](*罗伯特·普莱斯2020年4月4日*)
1, 2, 4, 6, 12, 26, 42, 52, 68, 78, 84, 114, 156, 186, 204, 222, 228, 372, 444, 546, 798, 876, 884, 1092, 1218, 1252, 1302, 1378, 1428, 1482, 1554, 1596, 1806, 2418, 2436, 2604, 2652, 2756, 2886, 2964, 3108, 3534, 3606, 3612, 3756, 3876, 4134, 4218, 4836
数学
加入[{1},选择[Range[5000],PowerMod[5,#^2,#^3]==1&]](*哈维·P·戴尔2017年5月4日*)
1, 2, 3, 4, 6, 8, 10, 12, 20, 24, 30, 40, 50, 57, 60, 68, 78, 100, 110, 111, 114, 120, 136, 150, 156, 200, 204, 220, 222, 228, 258, 300, 312, 330, 340, 390, 408, 440, 444, 456, 516, 550, 570, 600, 660, 680, 780, 820, 876, 888, 930, 1010, 1020, 1032, 1086, 1100
数学
选择[Range[1100],Divisible[7^(#^2)-1,#^3]&](*哈维·P·戴尔2011年11月5日*)
1, 2, 4, 8, 10, 20, 40, 68, 82, 110, 136, 164, 220, 328, 340, 410, 440, 610, 680, 772, 820, 1010, 1210, 1220, 1510, 1544, 1640, 2020, 2420, 2440, 2530, 2788, 3020, 3740, 3860, 4040, 4510, 4840, 5060, 5576, 6040, 6710, 6806, 7004, 7370, 7480, 7720, 8020, 9020
例子
9^(2^2)-1=6560,可以被2^3整除,所以2在序列中。
9^(4^2)-1=1853020188851840,可被4^3整除,因此4在序列中。
9^(6^2)-1=22528399544939174411840147874772640,不能被6整除,当然也不能被6^3整除,所以6不在序列中。
数学
选择[Range[100],Divisible[9^(#^2)-1,#^3]&](*阿隆索·德尔·阿特2014年10月4日*)
1, 2, 4, 5, 6, 10, 12, 20, 30, 42, 60, 68, 78, 84, 114, 122, 156, 204, 210, 222, 228, 244, 340, 366, 390, 420, 444, 546, 570, 610, 732, 780, 798, 820, 876, 930, 1010, 1020, 1092, 1110, 1140, 1164, 1218, 1220, 1428, 1482, 1554, 1596, 1806, 1830, 1860, 2020, 2220
数学
加入[{1},选择[Range[2300],PowerMod[11,#^2,#^3]==1&]](*哈维·P·戴尔2024年8月24日*)
1, 11, 253, 11891, 77209, 768361, 1775807, 17666737, 36112967, 61488361, 83462929, 154261943, 173185331, 591303757, 830336639, 971656873, 2936791979, 4139054953, 5393125859, 8139710557, 8142849781, 45667873031, 53653880269
数学
加入[{1},选择[Range[3000000],PowerMod[12,#^2,##^3]==1&]](*罗伯特·普莱斯2020年3月31日*)
1, 2, 3, 4, 6, 10, 12, 14, 20, 28, 30, 34, 42, 60, 68, 70, 84, 102, 110, 114, 140, 170, 183, 204, 210, 220, 222, 228, 238, 330, 340, 366, 406, 420, 444, 476, 510, 570, 660, 714, 732, 770, 798, 812, 820, 876, 930, 942, 1010, 1020, 1110, 1140, 1190, 1218, 1428
数学
加入[{1},选择[Range[3000000],PowerMod[13,#^2,#^3]==1&]](*罗伯特·普莱斯2020年3月31日*)
1, 2, 4, 7, 8, 14, 16, 28, 56, 68, 112, 136, 226, 272, 406, 452, 476, 812, 904, 952, 1582, 1624, 1808, 1904, 2056, 2758, 3164, 3248, 4112, 5516, 5956, 6328, 7684, 9316, 11032, 11912, 12656, 13804, 14392, 15368, 18632, 21512, 22064, 23824, 23954, 25144
数学
加入[{1},选择[Range[30000],PowerMod[15,#^2,#^3]==1&]](*罗伯特·普莱斯2020年4月4日*)
搜索在0.007秒内完成
|