Plot[Tooltip[{Log[Log[x]], Log[x],(x^(1/3)), (Sqrt[x]), x/Log[x]}], {x, 3, 500}]