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 A066181 #16 Jan 25 2017 15:15:05 %S A066181 1,3,2,5,6,4,8,9,10,7,12,13,14,15,11,17,18,19,20,21,16,23,24,25,26,27, %T A066181 28,22,30,31,32,33,34,35,36,29,38,39,40,41,42,43,44,45,37,47,48,49,50, %U A066181 51,52,53,54,55,46,57,58,59,60,61,62,63,64,65,66,56,68,69,70,71,72,73 %N A066181 Permutation of the integers with cycle form {1}, {2, 3}, {4, 5, 6}, {7, 8, 9, 10}, ... %C A066181 Arrange natural numbers 1,2,3,4,5,... as a triangle like A000027, then rotate each row of triangle one left. - _Antti Karttunen_, May 07 2002 %C A066181 For a group of n terms a^(n)(k)= k where n(n-1)/2 < k <= n(n+1)/2. E.g. for the three terms 5, 6 and 4, a(5)= 6, a(6) = 4, a(4) = 5; a(a(a(5))) = 5 = a^(3)(5). - _Amarnath Murthy_, May 31 2003 %H A066181 <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a> %F A066181 a(n) = 1 + n + binomial(round(sqrt(2*n)),2) - binomial(round(sqrt(2*n+2)),2). - _Brian Tenneson_, Jan 23 2017 %p A066181 a := proc(n) floor(sqrt(2*n));n+1;`if`(2*n=%%*(%%+1),%-%%,%) end: # _Peter Luschny_, Jan 25 2017 %t A066181 FromCycles[Table[n(n-1)/2+Range[n], {n, 13}]] %Y A066181 Inverse permutation: A066182. %K A066181 easy,nonn,tabl %O A066181 1,2 %A A066181 _Wouter Meeussen_, Dec 15 2001