login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Inverse permutation to A327119.
2

%I #13 Sep 16 2019 19:51:44

%S 1,2,4,3,6,10,8,5,7,16,12,28,14,22,9,11,18,15,20,26,13,34,24,82,46,40,

%T 36,19,30,23,32,21,64,52,17,50,38,58,76,27,42,244,44,56,31,70,48,25,

%U 29,100,66,35,54,39,136,43,106,88,60,118,62,94,37,51,78,47,68,86

%N Inverse permutation to A327119.

%H Jennifer Buckley, <a href="/A327120/b327120.txt">Table of n, a(n) for n = 0..10000</a>

%o (PARI) a(n) = { my (d=0); while (n, d = select(t -> t>d, divisors(n))[1]; my (k=n/d); if (k%2, n-=d, n+=d)); return (d+1) } \\ _Rémy Sigrist_, Sep 14 2019

%Y Inverse: A327119.

%K nonn

%O 0,2

%A _Jennifer Buckley_, Sep 13 2019