%I #20 Sep 27 2015 10:33:04
%S 1,2,4,8,9,17,19,35,39,71,79,143,159,287,319,575,639,1151,1279,2303,
%T 2559,4607,5119,9215,10239,18431,20479,36863,40959,73727,81919,147455,
%U 163839,294911,327679,589823,655359,1179647,1310719,2359295,2621439,4718591,5242879,9437183,10485759
%N Record values in A135141.
%C In binary, the terms of the sequence seem to follow a simple pattern:
%C 1 = a(1)
%C 10 = a(2)
%C 100 = a(3)
%C 1000 = a(4)
%C 1001 = a(5)
%C 10001 = a(6)
%C 10011 = a(7)
%C 100011 = a(8)
%C 100111 = a(9)
%C 1000111 = a(10)
%C 1001111 = a(11)
%C 10001111 = a(12)
%C 10011111 = a(13)
%C 100011111 = a(14)
%C 100111111 = a(15)
%C ...
%C thus the sequence seems to consist of, after 1 and 2, an interleaving of sequence A153894: 4, 9, 19, 39, 79, 159, 319, ... with the sequence A052996 from its third term onward: 8, 17, 35, 71, 143, ...
%H Antti Karttunen, <a href="/A246347/b246347.txt">Table of n, a(n) for n = 1..112</a>
%F a(n) = A135141(A246346(n)).
%t Union[FromDigits[#,2]&/@Flatten[Table[{PadRight[{1,0,0},n,1],PadRight[ {1,0,0,0},n,1]},{n,30}],1]] (* _Harvey P. Dale_, May 03 2015 *)
%o (PARI) \\ See code in A246348.
%o (Scheme) (define (A246347 n) (A135141 (A246346 n)))
%Y A246346 gives the corresponding positions in A135141.
%Y Cf. A052996, A153894, A246348, A246360.
%K nonn
%O 1,2
%A _Antti Karttunen_, Aug 27 2014 after _Robert G. Wilson v_'s note in A135141