找回密码
 欢迎注册
楼主: nyy

[原创] 有多少1999类型的素数?

[复制链接]
 楼主| 发表于 2025-3-31 18:23:15 | 显示全部楼层

19,199,1999这样的素数有多少个??
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
发表于 2025-3-31 18:42:58 | 显示全部楼层
本帖最后由 数论爱好者 于 2025-3-31 18:44 编辑
nyy 发表于 2025-3-31 18:23
19,199,1999这样的素数有多少个??


这个不是有现成的资料吗?
https://stdkmd.net/nrr/1/19999.htm
这个网页找到了20多个素数,太大了
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
发表于 2025-3-31 19:01:25 | 显示全部楼层
数论爱好者 发表于 2025-3-31 18:42
这个不是有现成的资料吗?
https://stdkmd.net/nrr/1/19999.htm
这个网页找到了20多个素数,太大了

你整的那些尽是高产素数,给你看一个低产素数,它不是没有,是太少。
(2*10^(n+2)-167)/3,611,6611,66611,666611,6666611,...系列。
n=0...,50000,你找找看
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
 楼主| 发表于 2025-4-1 12:27:05 | 显示全部楼层
mathe 发表于 2025-3-29 17:35
看上去挺多的
19
29

2000有啥不好?2000的最大缺点是不是素数!
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
 楼主| 发表于 2025-4-9 10:04:16 | 显示全部楼层
nyy 发表于 2025-3-31 18:23
19,199,1999这样的素数有多少个??
  1. Clear["Global`*"];(*mathematica11.2,win7(64bit)Clear all variables*)
  2. aaa=Table[{n,2*10^n-1},{n,1,100}];
  3. bbb=Select[aaa,PrimeQ[#[[2]]]&]
  4. Grid[bbb,Alignment->Left](*列表显示*)
复制代码


求解结果
1        19
2        199
3        1999
5        199999
7        19999999
26        199999999999999999999999999
27        1999999999999999999999999999
53        199999999999999999999999999999999999999999999999999999
第一列表示9的个数
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
发表于 2025-4-9 14:06:50 | 显示全部楼层
nyy 发表于 2025-4-9 10:04
求解结果
1        19
2        199

99成,稀罕物.
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
 楼主| 发表于 2025-4-11 09:37:53 | 显示全部楼层
nyy 发表于 2025-4-9 10:04
求解结果
1        19
2        199

发红包一般三种选择,要么19,要么199,要么1999,
希望有一天我能发199999的红包!
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
您需要登录后才可以回帖 登录 | 欢迎注册

本版积分规则

小黑屋|手机版|数学研发网 ( 苏ICP备07505100号 )

GMT+8, 2025-5-17 16:12 , Processed in 0.032435 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

快速回复 返回顶部 返回列表