登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: 编号:a254317
显示1-1个结果(共1个)。 第页1
    排序:关联|参考文献||被改进的|已创建     格式:长的|短的|数据
1954年2月17日 a(n)是使k的素因式分解中的不同位数为n的最小数k(将形式p^1的项计数为p)。 +0
2
1, 6, 26, 102, 510, 3210, 22890, 153690, 1507290, 15618090 (列表;图表;参考;;历史;文本;内部格式)
偏移
1,2
评论
将k写成素数幂的乘积;则a(n)是最小数k,使得k的乘积表示中的不同数字的总数(所有素数中的不同数字的数量和大于1的所有指数中的不同数字的数量)等于n。序列已完成。
属性:所有指数都等于1(参见下面的示例)。
链接
例子
a(1)=1;
a(2)=6=2*3和A254315型(6) = 2;
a(3)=26=2*13和A254315型(26) = 3;
a(4)=102=2*3*17和A254315型(102) = 4;
a(5)=510=2*3*5*17和A254315型(510) = 5;
a(6)=3210=2*3*5*107和A254315型(3210) = 6;
a(7)=22890=2*3*5*7*109和A254315型(22890) = 7;
a(8)=153690=2*3*5*47*109和A254315型(153690) = 8;
a(9)=1507290=2*3*5*47*1069和2015年2月23日(1507290) = 9;
a(10)=15618090=2*3*5*487*1069和2015年2月23日(15618090) = 10.
MAPLE公司
使用(ListTools):
对于从2到10的n,do:
ii:=0:
对于从2到10^9的k,当(ii=0)do时:
n0:=长度(k):lst:={}:x0:=系数(k)
y: =展平(x0[2]):z:=转换(y,set):
z1:=z减去{1}:nn0:=nops(z1):
对于从1到nn0的m,do:
t1:=转换(z1[m],基数,10):z2:=转换(t1,集合):
lst:=lst联合z2:
日期:
nn1:=无(lst):
如果nn1=n,则ii:=1:printf(“%d%d\n”,n,k):
其他的
图1:
日期:
日期:
数学
f[n_]:=块[{pf=FactorInteger@n,i},Length@DeleteDuplicates@Flatten@IntegerDigits@Rest@Flatten@Reap@Do[If[Last[pf[i]]]==1,Sow@First@pf[[i]],Sow@FromDigits@Flatten[IntegerDigits/@pf[i]],{i,Length@pf}]];b=-1;压扁@Last@Reap@Do[a=f[n];如果[a>b,母猪[n];b=a],{n,10^6}](*迈克尔·德弗利格2015年1月29日*)
使用[{s=Array[CountDistinct@Flatten@IntegerDigits[FactorInteger[#]/.{p_,e_}/;e==1:>{p}]&,10^6]},映射[FirstPosition[s,#][[1]]&,Range@Max@s]](*迈克尔·德弗利格2017年11月3日*)
黄体脂酮素
(PARI)a(n)=对于(k=1,10^5,s=[];F=系数(k);对于(i=1,#F[,1],s=concat(s,digits(F[i,1]));如果(F[i,2]>1,s=concat(s,digits(F[i,2]));如果(#vecsort(s,8)==n,返回(k))
打印1(1,“,”);对于(n=2,7,打印1(a(n),“,”)\\德里克·奥尔2015年1月30日
交叉参考
囊性纤维变性。A043537美元A254315型.
关键词
非n基础完成满的
作者
米歇尔·拉格诺2015年1月28日
扩展
a(10)修正人乔瓦尼·雷斯塔,2017年11月3日
状态
已批准
第页1

搜索在0.005秒内完成

查找|欢迎光临|维基|寄存器|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

最后修改时间:美国东部时间2024年5月5日19:41。包含372277个序列。(在oeis4上运行。)