# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a269370
Showing 1-1 of 1

%I A269370 #12 Mar 07 2016 12:11:56
%S A269370 1,1,2,1,4,2,3,1,7,4,6,2,9,3,13,1,8,7,5,4,15,6,10,2,21,9,19,3,12,13,
%T A269370 25,1,31,8,14,7,33,5,11,4,16,15,37,6,27,10,18,2,43,21,49,9,20,19,45,3,
%U A269370 39,12,22,13,17,25,51,1,24,31,63,8,67,14,26,7,69,33,73,5,28,11,75,4,23,16,30,15,55,37,79,6,32,27,61,10,87,18,34,2
%N A269370 a(1) = 1, after which, for odd n: a(n) = A260439(n)-th number k for which A260438(k) = A260438(n)-1, and for even n: a(n) = a(n/2).
%C A269370 For odd numbers n > 1, a(n) tells which term is on the immediately preceding row of A255551 (square array generated by Lucky sieve), in the same column where n itself is.
%H A269370 Antti Karttunen, <a href="/A269370/b269370.txt">Table of n, a(n) for n = 1..11017</a>
%F A269370 a(1) = 1; after which for even n, a(n) = a(n/2), and for odd n, a(n) = A255551(A260438(n)-1, A260439(n)).
%F A269370 Other identities. For all n >= 1:
%F A269370 a(A269369(n)) = n.
%o A269370 (Scheme) (define (A269370 n) (cond ((= 1 n) n) ((even? n) (A269370 (/ n 2))) (else (A255551bi (- (A260438 n) 1) (A260439 n))))) ;; Code for A255551bi given in A255551.
%Y A269370 Cf. A255551, A260438, A260439, A269369.
%Y A269370 Cf. also A268674, A269380.
%K A269370 nonn
%O A269370 1,3
%A A269370 _Antti Karttunen_, Mar 01 2016

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE