|
%I #43 Mar 26 2021 04:43:18
%S 0,2,6,9,14,22,29,38,51,61,74,92,105,122,145,161,182,210,229,254,287,
%T 309,338,376
%N a(n) is the maximum number of liberties a single group can have on an otherwise empty n X n Go board.
%C For 1 X 1 the solution is a single stone on the only possible position and is not a valid final board state in a real game of Go.
%C Also seems to be the answer to the following parking problem: maximum number of cars in an n X n carpark such that any car can leave through a single exit. See Puzzling StackExchange links. - _Dmitry Kamenetsky_, Mar 26 2021
%H Ton Hospel, <a href="https://github.com/thospel/Go-CountLiberties">Table of n, a(n) for n = 1..24</a>
%H Puzzling StackExchange, <a href="https://puzzling.stackexchange.com/questions/107886/placing-9-cars-into-a-4x4-carpark">Placing 9 cars into a 4x4 carpark</a>, March 2021.
%H Puzzling StackExchange, <a href="https://puzzling.stackexchange.com/questions/55853/a-special-parking-lot">A special parking lot</a>, October 2017.
%F Exact for n <= 24, conjectured for n > 24 but it is at least a lower bound:
%F a(n) = 0 if n = 1.
%F a(n) = 2 if n = 2.
%F a(n) = 6 if n = 3.
%F a(n) = n*(2*n-1)/3 if n = 0 (mod 3) and n != 3.
%F a(n) = ((2n-1)^2+5)/6 if n = 1 (mod 3) and n != 1.
%F a(n) = ((2n-1)^2+3)/6 if n = 2 (mod 3).
%F Conjectures from _Colin Barker_, Jun 05 2019: (Start)
%F G.f.: x^2*(2 + 4*x + 3*x^2 + x^3 + x^5 + x^6 + x^7 - x^8) / ((1 - x)^3*(1 + x + x^2)^2).
%F a(n) = a(n-1) + 2*a(n-3) - 2*a(n-4) - a(n-6) + a(n-7) for n>9.
%F (End)
%e For n = 7 one of many a(7) = 29 solutions:
%e *********
%e *.O.....*
%e *.OOOOOO*
%e *.O....O*
%e *.O.....*
%e *.O.OOO.*
%e *.OOO.O.*
%e *.O...O.*
%e *********
%o (Perl)
%o sub a {
%o # Conjectured: This program is valid for any m X n board size
%o my ($m, $n) = @_;
%o $n = $m if !defined $n;
%o ($m, $n) = ($n, $m) if $m > $n;
%o # So now $m <= $n
%o # This program is certain to be valid for all $m <= 24
%o if ($m >= 4) {
%o return $m*(2*$n-1)/3 if $m % 3 == 0;
%o return $n*(2*$m-1)/3 if $n % 3 == 0;
%o return ((2*$m-1)*(2*$n-1)+5)/6 if $m % 3 == 1 && $n % 3 == 1;
%o return ((2*$m-1)*(2*$n-1)+3)/6; # if $m % 3 == 2 || $n % 3 == 2
%o }
%o return 2*$n if $m == 3;
%o return $n == 3 ? 4 : $n if $m == 2;
%o return $n >= 3 ? 2 : $n-1 if $m == 1;
%o die "Bad call";
%o }
%Y A071619 is a trivial upper bound for this sequence.
%K nonn,more
%O 1,2
%A _Ton Hospel_, Oct 28 2018
| 