Plot[Re[((2 + I t) - 4)^(2 + I t)], {t, -1, 1}]