查看: 3551|回复: 18|关注: 0
怎么在同一个图里画四条曲线？
<h1 style="color:# 麦片财富积分
新手, 积分 7, 距离下一级还需 43 积分
本帖最后由 我是小白请指教 于
17:54 编辑
clear all； clc
disp('插值求取平滑曲线后的数值' )
t = [5 10 15 20 30 40 60 80 120] ;
A = [29.84 40.01 46.71 53.87 63.32 67.01 67.33 67.54 67.87];
knots = 3; K = 3 ;& && && & % 三次B样条
sp = spap2(knots,K,t,A);
pp = fnder(sp);& && && &% 计算B样条函数的导函数
dAdt = fnval(pp,t);& & % 计算t处的导函数值
% 绘制浓度拟合曲线
ti = linspace(t(1),t(end),200);
Ai = fnval(sp,ti)
plot(t,A,'ro',ti,Ai,'b-')
xlabel('t')
ylabel('X_A')
legend('实验值','B样条拟合')
我还有上面这样的线B、C、D三条，想要画到一张图上，而且都要计算插值，画出平滑的曲线，该怎么搞呢？只把点画出来的话我会，就用hold on，加了插值后就不会了。求指教
论坛优秀回答者
<h1 style="color:#50 麦片财富积分
关注者： 240
类似的吧，你可以把B C D 三条线都插值好之后，用得到的数据一起画图啊，没什么区别吧
<h1 style="color:# 麦片财富积分
我搞定了 ，谢谢你的指导
<h1 style="color:# 麦片财富积分
类似的吧，你可以把B C D 三条线都插值好之后，用得到的数据一起画图啊，没什么区别吧 ...
function DROWA_c
% 不同酸用量下除镁率的曲线
clear all； clc
disp('插值求取平滑曲线后的数值' )
t = [5 10 15 20 30 40 60 80 120] ;
A = [29.84 40.01 46.71 53.87 63.32 67.01 67.33 67.54 67.87];
knots = 3; K = 3 ;& && && & % 三次B样条
sp = spap2(knots,K,t,A);
pp = fnder(sp);& && && &% 计算B样条函数的导函数
dAdt = fnval(pp,t);& & % 计算t处的导函数值
% 绘制浓度拟合曲线
ti = linspace(t(1),t(end),200);
Ai = fnval(sp,ti);
plot(t,A,'ro',ti,Ai,'b:')
t = [5 10 15 20 30 40 60 80 120] ;
B = [36.32 48.21 55.81 62.21 69.81 72.39 72.72 72.91 73.92];
knots = 3; K = 3 ;& && && & % 三次B样条
sp = spap2(knots,K,t,B);
pp = fnder(sp);& && && &% 计算B样条函数的导函数
dBdt = fnval(pp,t);& & % 计算t处的导函数值
ti = linspace(t(1),t(end),200);
Bi = fnval(sp,ti);
plot(t,B,'rx',ti,Bi,'b:')
t = [5 10 15 20 30 40 60 80 120] ;
C = [41.91 55.62 64.13 70.46 77.64 79.80 80.04 80.57 83.92];
knots = 3; K = 3 ;& && && & % 三次B样条
sp = spap2(knots,K,t,C);
pp = fnder(sp);& && && &% 计算B样条函数的导函数
dCdt = fnval(pp,t);& & % 计算t处的导函数值
% 绘制浓度拟合曲线
ti = linspace(t(1),t(end),200);
Ci = fnval(sp,ti);
plot(t,C,'rs',ti,Ci,'b:')
t = [5 10 15 20 30 40 60 80 120] ;
D = [42.16 62.13 72.91 79.87 84.21 85.61 85.84 86.21 86.22];
knots = 3; K = 3 ;& && && & % 三次B样条
sp = spap2(knots,K,t,D);
pp = fnder(sp);& && && &% 计算B样条函数的导函数
dDdt = fnval(pp,t);& & % 计算t处的导函数值
% 绘制浓度拟合曲线
ti = linspace(t(1),t(end),200);
Di = fnval(sp,ti);
plot(t,D,'rv',ti,Di,'b:')
Xlabel('t')
ylabel('X_A')
这是我新写的，后面想用标签标示四种曲线，怎么搞啊
论坛优秀回答者
<h1 style="color:#50 麦片财富积分
关注者： 240
这种情况最简单的方式就是图出来之后，在图片工具栏选择insert命令，下面有插入legend的选项，点击就可以
<h1 style="color:# 麦片财富积分
这种情况最简单的方式就是图出来之后，在图片工具栏选择insert命令，下面有插入legend的选项，点击就可以 ...
我知道有插入可是插入后的图例是这样的
& & & & & & & & & & & & & & & &
<h1 style="color:# 麦片财富积分
这种情况最简单的方式就是图出来之后，在图片工具栏选择insert命令，下面有插入legend的选项，点击就可以 ...
我不会贴图，麻烦你用你那个运行下吧，出来的legend是包括所有的图例，我只要o x s v 四种符号的图例
论坛优秀回答者
<h1 style="color:#50 麦片财富积分
关注者： 240
我不会贴图，麻烦你用你那个运行下吧，出来的legend是包括所有的图例，我只要o x s v 四种符号的图例 ...
可以手动编辑的吧，然后删除不需要的就可以吧
<h1 style="color:# 麦片财富积分
可以手动编辑的吧，然后删除不需要的就可以吧
:L，我一点删除都是全部删除了
论坛优秀回答者
<h1 style="color:#50 麦片财富积分
关注者： 240
|此回复为最佳答案
clear all； clc
disp('插值求取平滑曲线后的数值' )
t = [5 10 15 20 30 40 60 80 120] ;
A = [29.84 40.01 46.71 53.87 63.32 67.01 67.33 67.54 67.87];
knots = 3; K = 3 ;& && && & % 三次B样条
sp = spap2(knots,K,t,A);
pp = fnder(sp);& && && &% 计算B样条函数的导函数
dAdt = fnval(pp,t);& & % 计算t处的导函数值
rAm = dA
% 绘制浓度拟合曲线
ti = linspace(t(1),t(end),200);
Ai = fnval(sp,ti);
plot(t,A,'ro',ti,Ai,'b:')
hold on
t = [5 10 15 20 30 40 60 80 120] ;
B = [36.32 48.21 55.81 62.21 69.81 72.39 72.72 72.91 73.92];
knots = 3; K = 3 ;& && && & % 三次B样条
sp = spap2(knots,K,t,B);
pp = fnder(sp);& && && &% 计算B样条函数的导函数
dBdt = fnval(pp,t);& & % 计算t处的导函数值
rBm = dB
ti = linspace(t(1),t(end),200);
Bi = fnval(sp,ti);
plot(t,B,'rx',ti,Bi,'b:')
hold on
t = [5 10 15 20 30 40 60 80 120] ;
C = [41.91 55.62 64.13 70.46 77.64 79.80 80.04 80.57 83.92];
knots = 3; K = 3 ;& && && & % 三次B样条
sp = spap2(knots,K,t,C);
pp = fnder(sp);& && && &% 计算B样条函数的导函数
dCdt = fnval(pp,t);& & % 计算t处的导函数值
rCm = dC
% 绘制浓度拟合曲线
ti = linspace(t(1),t(end),200);
Ci = fnval(sp,ti);
plot(t,C,'rs',ti,Ci,'b:')
hold on
t = [5 10 15 20 30 40 60 80 120] ;
D = [42.16 62.13 72.91 79.87 84.21 85.61 85.84 86.21 86.22];
knots = 3; K = 3 ;& && && & % 三次B样条
sp = spap2(knots,K,t,D);
pp = fnder(sp);& && && &% 计算B样条函数的导函数
dDdt = fnval(pp,t);& & % 计算t处的导函数值
rDm = dD
% 绘制浓度拟合曲线
ti = linspace(t(1),t(end),200);
Di = fnval(sp,ti);
plot(t,D,'rv',ti,Di,'b:')
xlabel('t')
ylabel('X_A')
legend('rv','rs','rx','ro')
figure()
plot(t,A,'ro')
hold on
plot(t,B,'rx')
plot(t,C,'rs')
plot(t,D,'rv')
plot(ti,Ai,'b:',ti,Bi,'b:',ti,Ci,'b:',ti,Di,'b:')复制代码
一种方法，比较呆。。。你右键第二张图的legend ，选择property属性，然后在里面进行设置只显示前四个
站长推荐 /2
Powered by这个叫做帕雷托图，网上搜下下现成的吧，也有叫帕拉图的。 你要不试一下，点图表向导里的线柱图，在图表类型边上一个表页里（自定义类型），我因现在用版有差别，
其他答案（共1个回答）
用EXCEL画的一种柱状图，以平均值为一条线，高于平均值的就是向上的柱状图，低于平均值的就是向下的柱状图。
想把去年和今年的销售量用柱状图表示，同时用折线图表示增长率，请问如何用你要不试一下，点图表向导里的线柱图，在图表类型边上一个表页里
这种情况可以使用countif函数帮助判断。请看附件。
选中要做次Y轴的数据，然后右键，选择“设置数列序列格式”----次坐标轴
为什么别人痛都是要生了，而我每次痛的厉害上个大号出来就好了
答: 慢慢弄。
我最开始只会装游戏；
后来中国有了网络慢慢跟朋友上聊天室聊天；
后来出了OICQ（现在叫QQ），又用那东西聊；
然后上联众玩在线游戏（棋牌类）...
答: 七十年代的计算机网络
X.25 分组交换网：各国的电信部门建设运行
各种专用的网络体系结构：SNA，DNA
Internet 的前身ARPANET进...
大家还关注
确定举报此问题
举报原因(必选)：
广告或垃圾信息
激进时政或意识形态话题
不雅词句或人身攻击
侵犯他人隐私
其它违法和不良信息
报告，这不是个问题
报告原因(必选)：
这不是个问题
这个问题分类似乎错了
这个不是我熟悉的地区}