A227510-OEIS公司

A227510型

数字n的乘积为正且n的子串为正的数。

三

1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 12, 13, 14, 15, 16, 17, 18, 19, 21, 31, 41, 51, 61, 71, 81, 91, 111, 112, 113, 114, 115, 116, 117, 118, 119, 121, 126, 131, 141, 151, 153, 161, 171, 181, 191, 211, 236, 243, 311, 315, 324, 362, 411, 511, 611, 612

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1,2

所有至少有一个零位的数字都有一个数字乘积，它是一个子串；由于对积极性的限制，这些都被排除在外。

序列是无限的：如果n是一个项，10n+1也是一个项。有没有其他模式（除了在任何术语前加1）-扎克·塞多夫2013年7月24日

您还可以在给出数字乘积的子字符串之外的任何位置插入1-罗伯特·伊斯雷尔2014年8月26日

另请参见A203566型对于非平凡子序列A203565型。后者的无零成员不同于此序列中的212个，其中212个在这里但不在这里，而236个在这里却不在那里-M.F.哈斯勒2014年10月14日

链接

扎克·塞多夫，n=1..10000时的n，a（n）表

例子

236位数的乘积是36，是236的子串，因此236是成员。

MAPLE公司

过滤器：=进程（n）

局部L；

五十： =换算（n，基数，10）；

如果有（L，0），则返回假fi；

verify（convert（转换（L，`*`），base，10），L，'子列表'）；

结束进程：

选择（筛选器，[$1..1000]）#罗伯特·伊斯雷尔，2014年8月26日

数学

选择[Range[650]，FreeQ[x=IntegerDigits[#]，0]和MemberQ[FromDigits/@Partition[x，IntegerLength[y=Times@@x]，1]，y]&]

黄体脂酮素

（Python）

从运算符导入mul

从functools导入reduce

A227510型=[int（n）代表n in（str（x）代表x in range（1，10**5）），如果

…………..不是n中的n.count（“0”）和str（reduce（mul，（int（d）表示n中的d））]

#柴华武2014年8月26日

（PARI）{isok（n）=d=数字（n）；p=prod（i=1，#d，d[i]）；k=1；while（p&&k<=（#d-#数字（p）+1），v=[]；for（j=k，k+#数字（p）-1，v=concat（v，d[j]））；if（v==数字（p

n=1；而（n<10^4，如果（isok（n），打印1（n，“，”））；n++）\\德里克·奥尔2014年8月26日

（PARI）是_A227510型（n） ={（t=数字（prod（i=1，#n=数字（n），n[i]））&&对于（i=0，#n-#t，vecextract（n，2^（i+#t）-2^i）==t&&返回（1））}\\M.F.哈斯勒2014年10月14日

交叉参考

囊性纤维变性。2018年5月18日,A203565型,A203566型,A203569型,A198298号,A236402型,A236403型,A236404型.

上下文中的序列：A361978飞机 A090274号 A254621型*A032898号 131058英镑 A032857号

相邻序列：A227507型 A227508型 A227509型*A227511型 A227512号 A227513型

关键词

非n,基础

作者

贾扬达·巴苏2013年7月14日

扩展

编辑人M.F.哈斯勒2014年10月14日

状态

经核准的