显示1-1个结果(共1个)。
第页1
83, 89, 181, 281, 283, 383, 389, 487, 587, 683, 787, 809, 811, 821, 823, 827, 829, 839, 853, 857, 859, 863, 877, 881, 883, 887, 983, 1087, 1181, 1187, 1283, 1289, 1381, 1481, 1483, 1487, 1489, 1583, 1783, 1787, 1789, 1801, 1811, 1823, 1831, 1847, 1861
例子
7387有除数83、89和7387,它们都包含数字8。
MAPLE公司
isA062677:=进程(n)
如果n=1,则
返回false;
结束条件:;
对于numtheory[除数](n)减去{1}do中的d
转换(convert(d,base,10),set);
如果不是8%,那么
返回false;
结束条件:;
结束do:
真;
结束进程:
n从1到2000 do
如果是A062677(n),则
printf(“%d,”,n);
结束条件:;
数学
fQ[n_,dgt_]:=并集[MemberQ[#,dgt]&/@IntegerDigits@Rest@Divisors@n][[1];选择[Range[2,1900],fQ[#,8]&](*罗伯特·威尔逊v2014年6月11日*)
交叉参考
囊性纤维变性。A062653号,A062664号,A062667号,A062668号,A062669号,A062670号,A062671号,A062672号,A062673号,A062674号,A062675号,A062676美元,A062678美元,A062679号,A062680型.
搜索在0.004秒内完成
查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。
许可协议、使用条款、隐私政策。.
最后修改时间:美国东部时间2024年9月22日19:13。包含376138个序列。(在oeis4上运行。)
|