A152082 - OEIS

%I #6 Sep 01 2019 02:38:56

%S 11,11,29,13,23,13,11,19,37,29,71,23,23,109,47,41,5,83,17,157,19,53,

%T 37,29,167,11,53,5,13,19,5,229,103,151,263,73,23,163,43,17,167,29,19,

%U 41,83,17,191,139,89,109,149,37,43,73,53,59,5,379,383,89,233,167

%N Largest prime divisors of the terms of A152080.

%t f[n_] := FromDigits[IntegerDigits[n, 2], 4]; pmax[n_] := FactorInteger[n][[-1, 1]]; pmax /@ Select[Range[1300], CompositeQ[#] && PrimeQ[f[#]] &] (* _Amiram Eldar_, Aug 31 2019 *)

%Y Cf. A000695, A152021, A152022, A152023, A152078, A152080.

%K nonn

%O 1,1

%A _Vladimir Shevelev_, Nov 23 2008

%E More terms from _Amiram Eldar_, Aug 31 2019