Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #3 Mar 30 2012 18:50:30
%S 0,0,0,0,0,-1,0,0,0,-1,0,-1,0,1,1,0,0,1,0,1,1,1,0,-1,0,-1,0,-1,0,-1,0,
%T 0,1,1,1,-1,0,-1,-1,1,0,-1,0,1,1,1,0,-1,0,1,-1,1,0,1,-1,1,1,1,0,1,0,1,
%U 1,0,-1,-1,0,-1,-1,-1,0,-1,0,1,-1,-1,1,-1,0,-1,0,-1,0,-1,-1,-1,-1,-1,0,-1,1,1,1,1,1,-1
%N signum(round(n^(1/Omega(n)))^Omega(n) - n), where Omega(n) is the total number of prime factors of n (A001222).
%C a(m) = 0 iff m is a prime power (A000961).
%Y a(n)=A057427(A079869(n) - n).
%K sign
%O 1,1
%A _Reinhard Zumkeller_, Jan 13 2003