%I
%S 1,5,29,53,89,113,173,209,329,413,509,545,713,725,809,833,893,965,
%T 1013,1133,1169,1625,1649,1685,1733,1769,1925,2009,2045,2129,2273,
%U 2393,2465,2549,2825,2933,3065,3149,3329,3389,3413,3473,3605,3653,3665,3773
%N Numbers n such that if 2n+1 divides 2^n+1 then 2(n+1)+1 also divides 2^(n+1)+1.
%C First of a pair of consecutive Curzon numbers, where Curzon numbers are given by A224486.
%t CuQ[n_] := IntegerQ[(2^n + 1)/(2*n + 1)]; Select[Range[4000], CuQ[#] && CuQ[# + 1] &]
%Y Cf. A224486.
%K nonn
%O 1,2
%A _Jayanta Basu_, Apr 08 2013
