Notebook[List[Cell[BoxData[FormBox[RowBox[List[UnderscriptBox["Max", "d"], "(", SubscriptBox["\[Rho]", "hd"], ")"]], TraditionalForm]], "Input"]]]