login
a(n) = A109890(A111315(n)).
4

%I #14 Mar 07 2018 06:47:51

%S 3,6,113573,230801,941071,5166859,30956561,123081011,3050325741,

%T 14086296281,60060345973,120331687901,316465918571,634257678809,

%U 8042099198501,34761370800833,134702376451061,269979973606237

%N a(n) = A109890(A111315(n)).

%o (PARI) s = 3; S = Set([1, 2]); i = 3; while (1, d = divisors(s); j = 1; while (setsearch(S, d[j]), j++); n = d[j]; if (n == s, print1(s, ", ")); s += n; S = setunion(S, Set(n)); i++); \\ _David Wasserman_, Jan 09 2009

%Y Cf. A109890, A111315.

%K nonn

%O 1,1

%A _N. J. A. Sloane_, Nov 04 2005

%E More terms from _David Wasserman_, Jan 09 2009