%I #17 Aug 27 2016 02:11:20
%S 0,1,2,1,3,2,2,2,4,3,2,3,3,2,3,2,5,4,3,4,3,3,3,3,4,2,3,3,4,3,3,3,6,5,
%T 4,5,3,4,4,4,4,3,4,3,4,4,3,4,5,2,3,4,4,3,4,3,5,4,3,3,4,3,4,3,7,6,5,6,
%U 4,5,5,5,4,4,5,4,4,5,4,5,5,3,4,4,5,4,4
%N a(n) is the first player's score in a "Coins in a Row" game over the n-th row of A066099 using a minimax strategy.
%C "Coins in a Row" is a game in which players alternate picking up coins of varying denominations from the end of the row in an attempt to collect as many points as possible.
%D Peter Winkler, Mathematical Puzzles: A Connoisseur's Collection, A K Peters/CRC Press, 2003, pages 1-2.
%H Peter Kagey, <a href="/A276166/b276166.txt">Table of n, a(n) for n = 0..10000</a>
%F a(n) = A029837(n + 1) - A276167(n).
%F a(n) = A276165(n) + A276167(n).
%e Let [R,L,L,L] represent a game in which the first player takes the right coin, the second player takes the left coin, the first player takes the left coin, and the second player takes the left (only remaining) coin.
%e A066099_Row(0) = [0]; a(0) = 0 via [L]
%e A066099_Row(1) = [1]; a(1) = 1 via [L]
%e A066099_Row(3) = [1,1]; a(3) = 1 via [R,L]
%e A066099_Row(22) = [2,1,2]; a(22) = 3 via [L,R,L]
%e A066099_Row(88) = [2,1,4]; a(88) = 5 via [R,L,L]
%e A066099_Row(1418) = [2,1,4,2,2]; a(1418) = 5 via [L,R,R,R,L]
%o (Haskell)
%o minimaxDifference [] = 0
%o minimaxDifference as = max (head as - minimaxDifference (tail as)) (last as - minimaxDifference (init as))
%o minimaxScore as = (sum as + minimaxDifference as) `div` 2
%o a276166 = minimaxScore . a066099_row
%Y Cf. A276163, A276164, A276165, A276167.
%K nonn
%O 0,3
%A _Peter Kagey_, Aug 25 2016