There are already a number of libraries in R that do this (including reverse portfolio optimization and Black-Litterman optimization)!