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.
%I A049106 #9 Apr 19 2025 14:39:02 %S A049106 1,2,37,14,1,1,2,2,88,926,247,104,114,4,196,754,214,9,289,571,47,32, %T A049106 2058,1696,36,2428,68,3,2946,3071,96,86,123,3,103,61,113,119,138,97, %U A049106 797,41153,30867,5672,30892,644,1146,31142,289,41893,499,896,109,33642 %N A049106 Ratio from A049102. %o A049106 (ARIBAS) function a049106(a,b: integer); var n,k,j,p,r,d: integer; s: string; begin for n := a to b do s := itoa(n); k := 0; p := 1; for j := 0 to length(s) - 1 do d := atoi(s[j..j]); k : = k + d; p := p*d; end; r := p*k; if r > 0 then if n mod r = 0 then write(n div r,","); end; end; end; end; a049106(0,1220000); %Y A049106 Cf. A049101, A049102, A049105. %K A049106 nonn,base %O A049106 1,2 %A A049106 _Olivier Gérard_ %E A049106 More terms from _Klaus Brockhaus_, Dec 13 2001