%I #10 Sep 25 2019 03:32:55
%S 1,3,7,9,11,15,27,31,49,59,63,123,127,135,177,201,225,251,255,287,297,
%T 363,377,433,441,507,511,567,729,855,945,961,1019,1023,1401,1969,2043,
%U 2047,3087,3135,3143,3449,3969,4017,4091,4095,5929,7545,8113,8187,8191
%N Numbers n such that the Stern polynomial B(n,x) is self-reciprocal.
%C These numbers are mentioned by Ulas and Ulas. All numbers of the form 2^k-1, 2^k-5, and (2^k-1)^2 are here.
%H Maciej Ulas and Oliwia Ulas, <a href="http://arxiv.org/abs/1102.5109">On certain arithmetic properties of Stern polynomials</a>, arXiv:1102.5109 [math.CO], 2011.
%t b[0]=0; b[1]=1; b[n_] := b[n] = If[EvenQ[n], x b[n/2], b[Floor[n/2]] + b[Ceiling[n/2]]]; Select[Range[10000], CoefficientList[b[#], x] == Reverse[CoefficientList[b[#], x]] &]
%Y Cf. A057526 (degree of Stern polynomials), A125184 (Stern polynomials)
%K nonn
%O 1,2
%A _T. D. Noe_, Feb 28 2011