Fail
Complex[0.41421356237309515, 1.4142135623730951] <- {Rule[Limit[Times[Power[n, -1], Power[Log[n], -1], Subscript[p, n]], Rule[n, DirectedInfinity[1]]], Times[Complex[1, 1], Power[2, Rational[1, 2]]]]}
Complex[0.41421356237309515, -1.4142135623730951] <- {Rule[Limit[Times[Power[n, -1], Power[Log[n], -1], Subscript[p, n]], Rule[n, DirectedInfinity[1]]], Times[Complex[1, -1], Power[2, Rational[1, 2]]]]}
Complex[-2.414213562373095, -1.4142135623730951] <- {Rule[Limit[Times[Power[n, -1], Power[Log[n], -1], Subscript[p, n]], Rule[n, DirectedInfinity[1]]], Times[Complex[-1, -1], Power[2, Rational[1, 2]]]]}
Complex[-2.414213562373095, 1.4142135623730951] <- {Rule[Limit[Times[Power[n, -1], Power[Log[n], -1], Subscript[p, n]], Rule[n, DirectedInfinity[1]]], Times[Complex[-1, 1], Power[2, Rational[1, 2]]]]}