%I#11 2012年12月26日14:45:35

%S 3,17,33,41,66,77,891171331451891612253012573243341，

%电话2974324253695176134415215855138096897926571001801881，

%电话：1000101787394590012651169142510891125119148111611584

%N a（N）是以N种方式表示的最小数字，它是3个强大（1）数字的总和。

%C这里我们考虑的是强大数（第一定义）A001694。注意，根据定义，1是强大的。

%H Donovan Johnson，<a href=“/A1155355/b115355.txt”>n，a（n）表，n=1..1000</a>

%H Eric Weisstein的数学世界，<a href=“http://mathworld.wolfram.com/PowerfulNumber.html“>强大的数字</a>

%e a（2）=17，因为17=4+4+9=8+8+1。

%t pwfQ[n_]：=n==1||分钟[转座[因子整数@n][[2]]] > 1; lim=5000；pt=选择[Range[lim]，pwfQ]；t=表[0，{i，lim}]；做[v=pt[[i]]+pt[[j]]+pt[[k]]；如果[v<=lim，t[[v]]++]，{i，长度@磅}，{j，i}，{k，j}]；表[位置[t，k][[1，1]]，{k，60}]

%Y参见A001694、A085252、A085233、A085256、A085255、A063274、A115354。

%K nonn公司

%O 1,1号机组

%A Giovanni Resta，2006年1月21日