Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #4 Jul 29 2023 15:59:00
%S 9,15,18,21,25,27,30,33,35,36,42,45,49,50,54,55,60,63,65,66,70,72,75,
%T 77,81,84,90,91,98,99,100,105,108,110,117,119,120,121,125,126,130,132,
%U 135,140,143,144,147,150,154,162,165,168,169,175,180,182,187,189,195,196,198,200,209,210,216,220,221,225,231
%N Numbers k such that A364557(k) < A000010(k), where A364557 is the Möbius transform of A005941, and A000010 is Euler totient function phi.
%o (PARI)
%o A364557(n) = if(1==n, 1, 2^(primepi(vecmax(factor(n)[, 1]))+(bigomega(n)-omega(n))-1));
%o isA364566(n) = (A364557(n)<eulerphi(n));
%Y Positions of negative terms in A364558.
%Y Cf. A000010, A364557, A364565.
%K nonn
%O 1,1
%A _Antti Karttunen_, Jul 29 2023