FunctionExpand[Integrate[BesselJ[0, r] BesselJ[2, r] r^3, r]]