Showing the coordinates on a plot in TraditionalForm

I just want to show the coordinates (Log[y/x],Log[x/y]) of a point on a Graphics object, but TraditionalForm fails to convert it, because (Log[y/x],Log[x/y]) is not a valid expression in Mathematica. How can I fix it?

Update

Junho's comment technically solved my problem.

Input:

Graphics[{Text@ TraditionalForm[Row[{"(", Log[x/y], ",", Log[1 + y/x], ")"}]]}]


Output:

But it looks really ugly, doesn't it? How can I make the outer paranthises larger and probably change the font to make it prettier?

• Row[{"(", Log[y/x], ", ", Log[x/y], ")"}] // TraditionalForm – Junho Lee Oct 29 '14 at 23:00
• @JunhoLee: Thanks Junho. Your comment somehow solved the problem. See my update please. – Helium Oct 29 '14 at 23:22

MatrixForm[{Log[x/y], ",", Log[1 + y/x]},


The spacing around the comma is not perfect but the parentheses look good.

PrettyPoint /: MakeBoxes[PrettyPoint[e___], TraditionalForm] :=
With[{mb = MakeBoxes[#, TraditionalForm] & /@ {e}},
RowBox[{"(", Sequence @@ Riffle[mb, ","], ")"}]
]

PrettyPoint[Log[x/y], Log[1 + y/x]] // TraditionalForm


ToString[{Log[x/y], Log[1 + y/x]},