R软件:怎么求分段函数的定积分
R软件:怎么求分段函数的定积分
给的题目如下:
数学解法:
现在需要用R语言求解。
首先,我尝试了直接在一个函数里用条件语句分段,再用integrate()函数求解,但是这个函数不能求分段函数的积分;
所以我就想简略一点,因为7~9正好在第二段里面,我将分段函数删到只剩第二段了,也就是一个常数,但是integrate()函数也报错了,它也不能求常数函数的积分,我彻底绝望了,就换了个思路。
接下来,我尝试了将三段函数的每一段分别创建一个函数,代码如下:
lam_1<-function(t){
-200+400*t
lam_2<-function(t){
lam_3<-function(t){
1400-400*(t-13)
然后建立一个求积分的总的大函数,代码如下:
ex<-function(a=7,b=9){
if(b<=3){inte<-integrate(lam_1,a,b)}
else if(b<=13){
if(a<3){inte<-integrate(lam_1,a,3)+integrate(lam_2,3,b)}
else(a>=3){ inte<-integrate(lam_2,a,b)}}
else(b<=16){
if(a<3){inte<-integrate(lam_1,a,3)+integrate(lam_2,3,13)+integrate(lam_3,13,b)}
else if(a<13){inte<-integrate(lam_2,a,13)+integrate(lam_3,13,b)}
else{inte<-integrate(lam_3,a,b)}}
return(inte)
但是一直报错:
但是我的语法好像又没有什么问题,所以不知道怎么办了,想请问一下大家,我错在哪里,或者有什么办法求分段函数的定积分呢?
0
提建议
邀请回答
编辑
收藏
删除
收藏
举报
追加酬金
(90%的用户在追加酬金后获得了解决方案)
当前问题酬金
¥
0
(可追加 ¥500)
支付方式
扫码支付
加载中...
0
条回答
默认
最新
查看更多回答(-1条)
悬赏问题
-
¥15
matlab有svec这个函数吗?
无法调用VideoWriter_fourcc
VB6.0无法加载网页验证码图片到picturebox中,求解。
C#和GDAL对栅格处理
我现在有一些关于提升机故障的专有文本数据,量也不多,我在label studio上进行了关系和实体的标注,完成了知识图谱的构造,那么我使用生成式模型的话,我能做哪些工作来写我的论文?
电脑连不上无线网络如下诊断反馈应该如何操作
telegram api 使用forward_messages方法转发消息时,目标群组里面会出现此消息来源,如何隐藏?
关于#tensorflow#的问题:有没有什么方法可以让机器自己学会像素风格的图片