Linear Optimisation lpSolve in R

Question

I\'ve got a data-frame of scores per week stats, snippet below. I\'m trying to run a linear optimisation using lpSolve for the top scoring side over the whole s