提出
经核准的
编辑
Robert Israel,<a href=“/A115688号/b115688.txt“>n表,n=1..908时为a(n)</a>
N: =99999:
S: ={1}:
p: =1:
做
p: =下一素数(p);
如果p^2>N,则打破fi;
S: =S联合图(t->seq(t*p^j,j=2..层(log[p](N/t)),S);
日期:
digrev:=程序(x)局部L;
五十: =换算(x,基数,10);
加(L[-i]*10^(i-1),i=1..nops(L))
结束进程:
排序(convert({10}联合选择(t->numtheory:-bigomega(t)=2,map(digrev,select(t->t mod 10<>0,S)),list))#罗伯特·伊斯雷尔2019年12月3日
_乔瓦尼·雷斯塔 (克.重新启动(自动变速箱)iit公司.中央铁路公司.它), _, 2006年1月31日
OEIS服务器: https://oeis.org/edit/global/192
半素数(A001358号)其数字反转是一个强大的(1)数(A001694号).
4, 9, 10, 46, 94, 121, 169, 215, 526, 869, 961, 982, 1042, 1273, 1405, 1843, 2918, 3194, 4069, 4633, 5213, 5221, 5758, 6313, 6511, 6937, 8045, 8402, 8651, 8882, 9235, 9481, 9586, 9886, 10201, 10609, 12538, 12769, 14023, 16171, 16327, 16582
1,1
869=11*79是半素数,968=2^3*11^2是强大的。
囊性纤维变性。A001358号,A001694号,A115687号.
非n,基础
Giovanni Resta(g.Resta(AT)iit.cnr.it),2006年1月31日