matlab 基础视频教程

xxaxiuxluo

新人福利

xxaxiuxluo

已经没有了。。

J000

不错不错不错不错不错

张东波

大学时候数学建模用到的，现在还想看看

叫我阿杰

回复，学习

La_pluie

很好的资料，谢谢共享。

La_pluie

谢谢楼主共享。

Sphoie

先谢啦！！！！！！！！！！！！！！！！！！！！！！

haoxiaoxiao28

较新一篇         / 较旧一篇
分享
【Matlab技术】石油大学网络缴费方案投票分析器
* ~8 k$ X- A9 D 公开 2013-12-11 01:24 | (分类:默认分类)
. M4 t- q1 ~- I' g0 ^5 c
0 ?, Y  ~* f8 ~! u一、引言：http://webservice.cup.edu.cn/poll/papers/paper_6.html

经调研，目前各高校普遍采取按流量计费策略来解决网络拥堵问题。实行按流量计费策略之后，能有效限制在线视频观看、视频文件下载等与正常学习、科研无关的网络活动，节约出口带宽的资源。
: m) m) C+ P6 O' A4 l; X6 k
通过与部分老师、学生交流讨论，结合我校实际，形成以下网络计费改革方案在全校范围内公开投票，每种方案各有优缺点，请谨慎选择，谢谢合作。
) v" q3 d( ^) `6 A5 `
7 H. d0 E, a1 L2 R7 B; [  J0 @投票结束后，将向学校提交投票结果，最终由校长办公会来决策网络计费改革方案，信息技术中心做好技术准备后择机实施。
  x! h  q1 N9 }7 m9 w
本投票采取一人一票制；
4 W2 s6 U/ |. E
本投票设为单选，每人只限一个选项；

* w8 c% O: V9 ]( ]- p  O5 Q" b# Q: d1 u投票人需填写校园卡用户身份信息才能进行投票。如有疑问，请拨打电话89734964；

! K' N5 \& s) |% f  R$ E5 ?' p3 K  ~6 f投票期限：2013-12-9至2013-12-13 16:00；
! L+ D: ]3 A, J1 I
1、方案一：每户每月2G免费，超出部分按0.15分/M。月使用8G以内流量合适。
7 w* d" k! x% l/ c
# _1 U4 G5 j# U! \' \) {/ w2、方案二：每户每月10元包15G，超出部分按0.2分/M。月使用20G以内流量合适。

3、方案三：纯按流量收费，0.1分/M。月使用20G以上流量合适。

4、方案四：保持现状，包月不限流量，20元/月。网络拥堵现状无法解决。
: ]- i( A# g8 A* E' u
1 k( x/ z+ ^5 @% j7 G% C二、分析：
' a- o# _/ F. H& |" k3 n
很多同学面对这4个方案，不知道那个适合自己，最后算是随便投一票，或者大部分人会投方案四，保持不变。这里写了简单的程序，帮助大家分析，选择投票。
' N; {  k8 T, [! g# w


$ A, o& l8 P" M" i7 G这个图自然是用matlab做出的，可以看出：
- g. T7 q  }9 s7 C
5 z( C; P7 i  C9 ^3 _5 `& D1、如果你每月使用量很小，小于7G，方案一花费最低；

. H3 `- M% ]2 F5 {9 w  n$ ^2、如果你的使用量在7-10G或者>20G，方案三不错的；

6 }. a1 T7 }9 I% p  i: O3、方案二适合于月流量在10-20G之间的同学。
, Z7 P& H% {7 T& p8 f5 m2 f4 T1 Z4 V
2 K2 t4 O7 A) z# E/ h三、源码：http://pan.baidu.com/share/link? ... 0&uk=4212195192

9 R- Q0 T! h* q7 ^1、main文件

$ R7 z5 I! V! x, v( H& V5 Rclc,clear,close all
yourflow = input('请输入你每月的流量(0-100G):');
& W! S# m. ~3 e4 c; C2 }flow = linspace(0,100);
flow = flow';
n = length(flow);
3 {; E+ d; o4 |8 k4 k5 K8 `cost = arrayfun(@(f)getcost(flow,f),(1:4)','UniformOutput',false);
cost = cost';
cost = cell2mat(cost);
( }% y9 R. {# H8 j! H6 W  Kyourcost = interp1(flow,cost(:,1:3),yourflow);
# B4 U/ ^0 ^# }9 X7 q3 a. X- h2 uf = find(min(yourcost)==yourcost);
6 v! T6 f! V- }% `ch = ['您最适合方案',num2str(f)];
. {* E+ N7 V0 ^' x/ `3 Qfigure
h1 = plot(flow,cost,'LineWidth',1.5);
- F2 A3 U" p/ r& K4 |% th2 = line([yourflow yourflow],[0 180]);
. A4 d- T2 l, sset(h1(4),'LineStyle','--')
* G# d3 s5 v! p# y* Cset(h2,'LineStyle','-.','LineWidth',1.5,'color','k')
grid on
box on
xlabel('flow / G')
# ~9 |8 |! Y4 A; O- wylabel('cost/ Y')
5 P/ ]- g5 V" C6 i( z1 f  xtitle('石油大学网络收费')
ht = text(yourflow,100,ch,'edgecolor','red','linestyle','-');
8 L* T) _2 N$ {2 t( p: B. W$ {2 s( r1 mif yourflow>50
  d5 c/ e2 q. h/ @set(ht,'HorizontalAlignment','right')
end

4 ?' g0 d$ w3 e+ Wlegend('方案一','方案二','方案三','方案四','location','northwest')

2、getcost函数文件

function c = getcost(x,f)
x = x(;
+ K% V( F) @7 [8 u$ c+ O8 v/ T) Mn = length(x);
switch f
5 U; b' j1 o, r6 `/ q) S6 L3 zcase 1
c = method1(x);
% U5 q8 `/ T2 t: A5 T( v$ a1 }% {( vcase 2
c = method2(x);
case 3
: n3 w0 ?# c* |c = method3(x);
case 4
3 {7 [4 ^* ~3 g2 G7 ~) _1 @. R8 Uc = method4;
otherwise
error('no this method')
end
5 U7 e% v3 G1 N' Y) R
  M: U, ]0 Z$ |* ?0 vfunction y = method1(x)
y = zeros(n,1);
0 V! i! X$ G/ y7 n4 i, My(x>2) = 1.5*(x(x>2)-2);
end
function y = method2(x)
: R' O  I8 L5 ?$ f) @9 L  B; ry = zeros(n,1)+10;
% P1 x" B* H8 ^2 c- Z! W( @: }- f: }y(x>15) = 10 + 2*(x(x>15)-15);
( ^) C" d7 U0 H# W# Gend
function y = method3(x)
y = x;
$ p' M8 a4 j% K5 z1 Z0 hend
function y = method4
y = 20+zeros(n,1);
end
6 b7 g  F; Z. P0 mend

HUAciscoWEI

应该好不错，渴望拥有的