A230106-OEIS公司

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

A230106型

使m+（m的非零位数的乘积）等于n的m数。

2

0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 1, 2, 0, 2, 0, 2, 0, 2, 0, 1, 0, 2, 1, 1, 0, 2, 0, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 2, 0, 0, 1, 1, 0, 2, 1, 1, 1, 0, 0, 2, 0, 0, 0, 1, 2, 1, 0, 1, 0, 1, 0, 2, 0, 0, 1, 2, 1, 1, 0, 1, 0, 0, 0, 2, 1, 0, 1, 1, 0, 2, 1, 0, 0, 0, 1, 2, 0, 2, 1, 0, 0, 1, 0, 1, 1, 0, 0, 2, 1, 1, 1, 3

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

抵消

0,13

评论

n出现的次数A063114号.

链接

n，a（n）的表，n=0..102。

哥伦比亚或自身编号和相关序列的索引条目

MAPLE公司

#的Maple代码A063114号,A230106型,A063425号,A096922号

使用（线性代数）：

读取转换；#获取digprod0

M： =1000；

lis1:=数组（0..M）；

lis2:=数组（0..M）；

ctmax:=4；

对于从0到ctmax的i，执行ct[i]：=数组（0..M）；日期：

对于从0到M的n do

m： =n+digprod0（n）；

lis1[n]：=m；

如果（m<=m），则lis2[m]：=lis2[m]+1；fi；

日期：

t1:=[seq（lis1[i]，i=0..M）]； #A063114号

t2:=[seq（lis2[i]，i=0..M）]； #A230106型

压缩机（t1）； #A063425号

对于i从1到M do h:=lis2[i]；

如果h<=ctmax，则ct[h]：=[op（ct[h]]），i]；fi；日期：

长度：=nops（ct[0]）；[seq（ct[0][i]，i=1..len）]； #A063425号再一次

长度：=nops（ct[1]）；[seq（ct[1][i]，i=1..len）]； #A096922号

交叉参考

囊性纤维变性。A063108号,A063114号,A230099型,A230104型,A063425号,A096922号.

的变体A096972号.

上下文中的顺序：A353460型 A026611号 127152英镑*A096972号 A101227号 127162英镑

相邻序列：A230103型 A230104型 A230105型*A230107型 A230108型 A230109型

关键词

非n,基础

作者

N.J.A.斯隆2013年10月13日

扩展

a（1）修正人扎克·塞多夫2013年10月24日

状态

经核准的