|
%I #6 Nov 25 2022 19:06:31
%S 0,11,120,222,201,111,1300,1313,2330,3333,3302,2312,2020,3023,1120,
%T 1223,2222,3122,3001,2011,3131,2231,1201,1111,14000,14014,14140,14244,
%U 14203,14113,24400,24414,34440,44444,44403,34413,34030,44034,24130
%N Each permutation in the list A060117 converted to Site Swap notation, with digits reversed and inverted. "Zero throws" (fixed elements) indicated with 0's.
%C This sequence is not well-defined for n >= 3628800 because the Site Swap notation can contain values exceeding 9, for example, the Site Swap notation for a(3628800) is [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 10]. - _Sean A. Irvine_, Nov 25 2022
%F a(n) = SiteSwap3ToDec(Perm2SiteSwap1(PermUnrank3R(n))).
%p SiteSwap3ToDec := proc(s) local i,z,n; n := nops(s); z := 0; for i from n by -1 to 1 do z := 10*z; if(s[i] > 0) then z := z + (n-s[i]); fi; od; RETURN(z); end;
%Y Cf. A060495, A060496, A060499. Average of digits gives number of balls: A060502.
%K nonn
%O 0,2
%A _Antti Karttunen_, Mar 22 2001
|
