cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A145745 Numbers n such that n = sigma(sum of digits of n)*sigma(product of digits of n).

This page as a plain text file.
%I A145745 #16 Sep 05 2023 12:21:39
%S A145745 1,12,6266169,6931848
%N A145745 Numbers n such that n = sigma(sum of digits of n)*sigma(product of digits of n).
%C A145745 No further terms up to 10^26. - _Chai Wah Wu_, Nov 28 2015
%C A145745 No other terms below 10^100. The sequence is likely finite and complete. - _Max Alekseyev_, Sep 05 2023
%e A145745 12 = 4*3 = sigma(1+2)*sigma(1*2).
%e A145745 6931848 = 56*123783 = sigma(6+9+3+1+8+4+8)*sigma(6*9*3*1*8*4*8).
%t A145745 Do[h=IntegerDigits[n]; s=Apply[Plus,h];p=Apply[Times,h];If[n== DivisorSigma[1,s]*DivisorSigma[1,p],Print[n]],{n,2000000000}]
%Y A145745 Cf. A038369.
%K A145745 base,more,nonn
%O A145745 1,2
%A A145745 _Farideh Firoozbakht_, Oct 26 2008