39数学软件 Mathematica的应用三 例1设∫(x)=2xlog3()-5c0sx, (1)分析函数f(x)在区间[1,10内的变化情况,并 描绘函数在该区间的图像, (2)作连结(1,f(1)和(10,f(10)的两点的割线, (3)在区间(1,10)内找出使函数∫(x)满足拉格朗 日中值定理结论的点ξ, (4)过点(,f(2)作曲线的切线,观察此切线是否 平行于(2)中所作的割线?
3.9 数学软件Mathematica的应用三 例1 设 （1）分析函数 在区间[1，10]内的变化情况，并 描绘函数在该区间的图像， （2）作连结 的两点的割线， （3）在区间（1，10）内找出使函数 满足拉格朗 日中值定理结论的点 ， （4）过点 作曲线的切线，观察此切线是否 平行于（2）中所作的割线？ ) 5cos , e ( ) 2 log ( 3 x x f x = x − f (x) (1, f (1))和(10, f (10)) f (x) (, f ( ))
解(1)先对f(x)求一阶导,用 Mathematica的求导指 令D,x求得: 2n x f(x)=5sin x In 3 再求f(x)的二阶导,用指令D[,{x,2},求得 2 f(x=5cosx x in 3 用指令 Plot[f,{x,1,10}, AxesLabel→>{x,y}],绘出函数 y=f(x)在区间[,10]上的图形,如图3-20 图3-20 15 -20
解（1）先对 求一阶导，用Mathematica的求导指 令D[f, x]求得： 再求 的二阶导，用指令D[f,{x, 2}], 求得 用指令Plot[f,{x,1,10}, AxesLabel {x, y}], 绘出函数 在区间[1，10]上的图形，如图3-20. f (x) , ln 3 2 ( ) 5cos x f x = x − f (x) , ln 3 2ln ( ) 5sin x f x = x − y = f (x) → → 图3-20
用指令 Pot[f’,{x,10, Axeslable→>{x,y] 绘出一阶导函数y=f(x)在区间[1,10上的图形,如图 3-21 Y 图3-21 2468
用指令 绘出一阶导函数 在区间[1，10]上的图形，如图 3-21. Plot[f ,{x,1,10},AxesLable →{x, y}] y = f '(x) 图3-21
观察图3-20,用指令 Findroot函数求根,分别求出 f(x)=0的两个零点,x=1.20589及x=407073 再观察图3-21,用指令 Findroot函数求根,分别求 出y=f(x)的三个零点x=27626,x=707615,x=85294 观察图3-21,用指令 Findroot函数求根,分别求 出y=f"(x)的三个零点 ,x=1.28307,x=4.7885,x=7.80733 观察图320及图3-21,得到函数y=f(x)在[1,10 上的单调增区间为[2.7626∪(7.076158.5294)
观察图3-20，用指令FindRoot函数求根，分别求出 的两个零点， 再观察图3-21，用指令FindRoot函数求根，分别求 出 的三个零点 观察图3-21，用指令FindRoot函数求根，分别求 出 的三个零点， 观察图3-20及图3-21，得到函数 在[1，10] 上的单调增区间为 x x = = 1.20589 4.07073 . 及 y = f '(x) x = 2.7626, x = 7.07615, x = 8.5294 . y = f ''(x) x =1.28307, x = 4.7885, x = 7.80733 . y = f (x) [1,2.7626](7.07615,8.5294), f (x) = 0
单调减区间为[27626,7.07615]∪[8.5294,10 f(27626)46385和f(85294=1463为极大值 f(7.0715)=-158333为极小值 f()=-08810330=-195179因此在[1,10上的最大 值为f(2.7626)=4.56385,最小值为f(10)=-19.5179 函数f(x)在[1,10上的上凸区间为: (1.28307,47885)(780733,10 函数y=f(x)在[1,10上的下凸区间为: 1128307]U[47885,7.80733]
为极小值. 因此在[1，10]上的最大 值为 最小值为 函数 在[1，10]上的上凸区间为： 函数 在[1，10]上的下凸区间为： 单调减区间为[2.7626, 7. 07615] [8.5294, 10]. (2.7626)=4.56385 和 (8.5294)= -14.63为极大值， f (7.0715) = −15.8333 f (1) = −0.881033, f (10) = −19.5179, f (x) f (2.7626) = 4.56385, f (10) = −19.5179 . (1.28307,4.7885)(7.80733,10] . y = f (x) [1,1.28307][4.7885,7.80733] . f f