This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A252460 #11 Dec 23 2014 00:35:58 %S A252460 1,2,4,3,7,5,11,8,6,12,16,17,22,23,9,30,29,38,37,47,13,57,46,68,10,80, %T A252460 18,93,56,107,67,122,24,138,14,155,79,173,31,192,92,212,106,233,39, %U A252460 255,121,278,15,302,48,327,137,353,19,380,58,408,154,437,172,467,69,498,25,530,191,563,81,597,211,632,232,668,94,705,20 %N A252460 Inverse permutation to A083221 considered as a permutation of natural numbers (with assumption that a(1) = 1). %H A252460 Antti Karttunen, <a href="/A252460/b252460.txt">Table of n, a(n) for n = 1..10000</a> %H A252460 <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a> %F A252460 a(1) = 1; for n>1: a(n) = 2 + ((((x+y)^2) - x - 3*y)/2), where x = A055396(n) and y = A078898(n). %F A252460 a(1) = 1; for n>1: a(n) = 1 + A249742(n-1). %o A252460 (Scheme. Two variants) %o A252460 (define (A252460 n) (if (<= n 1) n (let ((x (A055396 n)) (y (A078898 n))) (+ 1 (* (/ 1 2) (- (expt (+ x y) 2) x y y y -2)))))) %o A252460 (define (A252460 n) (if (<= n 1) n (+ 1 (A249742 (- n 1))))) %Y A252460 Essentially after a(1) one more than A249742. %Y A252460 Inverse permutation: A083221. %Y A252460 Cf. A055396, A078898. %K A252460 nonn,look %O A252460 1,2 %A A252460 _Antti Karttunen_, Dec 19 2014