%I#10 2019年10月10日00:13:00

%S 4,22,27,94121166202265274346355382438454517526562634，

%电话：70685291391592210861111165121912551282150716261633，

%电话：164218221894190319662067215521732182222722652326236224092434

%N对N进行编号，使N的数字和等于其素因子的“并置”和“和”的数字和（以重数计算）。

%t d[n_]：=整数位数[n]；co[n_，k_]：=嵌套[d[{#，n}]&，n，k-1]；t={}；Do[If[！PrimeQ[n]&&Total[d[n]]==总计[d[Total[Times@@@（x=FactorInteger[n]）]]==Total[Flatten[d[co@@x]]]，AppendTo[t，n]]，{n，42435}]；t（*Jayanta Basu，2013年6月4日*）

%Y参见A006753、A036920、A019506。

%K nonn，基础

%O 1,1号机组

%A _帕特里克·德·吉斯特，1999年1月4日