I am trying to check if a function remains unevaluated. For example $ $ \int \ln ^5(3 x) \sec (3 x) \, dx$ $ remains unevaluated in Mathematica, instead $ $ \int \sec (3 x) \, dx$ $ doesn’t. What I tried is func = Log[3 x]^5*Sec[3 x]; IntFunc = With[{function = func}, HoldForm[Integrate[function, x]]];Read more