ParametricPlot[{Log[t]/t, t Log[t]}]