# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a337385 Showing 1-1 of 1 %I A337385 #11 Sep 25 2020 04:23:27 %S A337385 334639305,1003917915,1265809545,1353106755,1673196525,2109682575, %T A337385 2255177925,2342475135,2553826275,2691663975,2729952225,2953555605, %U A337385 2982654675,3011753745,3128150025,3157249095,3234846615,3258330075,3419140725,3442113675,3681032355,3797428635,3855626775,4059320265,4292112825,4350310965 %N A337385 Odd numbers k for which A003973(k) >= 2*A003961(k). %C A337385 Provided that there are no odd perfect numbers, then applying A003961 to each term and sorting into ascending order gives A115414. %C A337385 Apparently, all terms are divisible by 255255 = 3*5*7*11*13*17. - _Hugo Pfoertner_, Sep 24 2020 %H A337385 Index entries for sequences computed from indices in prime factorization %H A337385 Index entries for sequences related to sigma(n) %o A337385 (PARI) %o A337385 A003961(n) = { my(f = factor(n)); for (i=1, #f~, f[i, 1] = nextprime(f[i, 1]+1)); factorback(f); }; %o A337385 isA337385(n) = if(!(n%2),0,my(x=A003961(n)); (sigma(x)>=2*x)); %Y A337385 Subsequence of A337386. %Y A337385 Cf. A000203, A003961, A003973, A115414. %K A337385 nonn %O A337385 1,1 %A A337385 _Antti Karttunen_, Aug 31 2020 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE