# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a325571 Showing 1-1 of 1 %I A325571 #6 May 11 2019 02:24:18 %S A325571 15,25,27,39,51,55,57,63,69,77,81,85,87,91,95,99,111,115,117,119,121, %T A325571 123,125,141,143,145,147,159,169,171,175,177,183,185,187,201,203,205, %U A325571 207,209,213,215,219,221,231,235,237,243,245,247,249,253,255,261,265,267,275,285,287,289,291,295,299,301,303,305,319,321 %N A325571 Composite numbers n that have no divisor d > 1 such that A048720(A065621(d),n/d) = n. %H A325571 Antti Karttunen, Table of n, a(n) for n = 1..10000 %o A325571 (PARI) %o A325571 A048720(b,c) = fromdigits(Vec(Pol(binary(b))*Pol(binary(c)))%2, 2); %o A325571 A065621(n) = bitxor(n-1,n+n-1); %o A325571 isA325571(n) = ((n>1)&&!isprime(n)&&fordiv(n,d,if(A048720(A065621(n/d),d)==n,return(d==n)))); %Y A325571 Cf. A048720, A065621, A325573. %Y A325571 Intersection of A002808 and A325570. %K A325571 nonn %O A325571 1,1 %A A325571 _Antti Karttunen_, May 10 2019 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE