|
%I #11 Oct 30 2016 13:44:37
%S 1,5,13,29,41,61,85,125,173,209,253,281,313,349,421,509,565,629,701,
%T 845,929,1021,1133,1261,1405,1693,1861,2045,2269,2525,2665,2813,3121,
%U 3313,3389,3725,3905,4093,4541,4841,5053,5209,5257,5333,5629,5993,6245,6629,6781,7453,7813,8189,8537,9085,9593,9685,9905,10109,10421,10517,10669,10921
%N Positions of ones in A264977; positions of twos in A277330.
%C Positions in A260443 of terms that are twice square (terms in A001105, although not all of them are present in A260443).
%H Antti Karttunen, <a href="/A277701/b277701.txt">Table of n, a(n) for n = 1..720</a>
%F A277712(n) = 2*a(n) for all n >= 1.
%o (Scheme, with _Antti Karttunen_'s IntSeq-library, two implementations)
%o (define A277701 (MATCHING-POS 1 1 (lambda (n) (= 1 (A264977 n)))))
%o (define A277701 (MATCHING-POS 1 1 (lambda (n) (= 2 (A277330 n)))))
%Y Row 1 of A277710.
%Y Cf. A001105, A260443, A264977, A277330.
%Y Cf. also A277712, A277713.
%K nonn
%O 1,2
%A _Antti Karttunen_, Oct 27 2016
|
