matlab 基础视频教程

xxaxiuxluo

新人福利

xxaxiuxluo

已经没有了。。

J000

不错不错不错不错不错

张东波

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

叫我阿杰

回复，学习

La_pluie

很好的资料，谢谢共享。

La_pluie

谢谢楼主共享。

Sphoie

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

haoxiaoxiao28

较新一篇         / 较旧一篇
分享
【Matlab技术】石油大学网络缴费方案投票分析器
公开 2013-12-11 01:24 | (分类:默认分类)
8 T& r) z" u& K6 S
/ F  s, d! v* u一、引言：http://webservice.cup.edu.cn/poll/papers/paper_6.html

0 B: K3 @1 E& Q9 ~! {  ^) |经调研，目前各高校普遍采取按流量计费策略来解决网络拥堵问题。实行按流量计费策略之后，能有效限制在线视频观看、视频文件下载等与正常学习、科研无关的网络活动，节约出口带宽的资源。
$ `. s. u' l' `: e' l8 e$ L
3 M  O2 k9 C8 M, F: }2 o; l通过与部分老师、学生交流讨论，结合我校实际，形成以下网络计费改革方案在全校范围内公开投票，每种方案各有优缺点，请谨慎选择，谢谢合作。
1 i5 n. D9 A: L9 u1 B
# r2 O" l' O2 p4 y! H7 V3 r! L投票结束后，将向学校提交投票结果，最终由校长办公会来决策网络计费改革方案，信息技术中心做好技术准备后择机实施。

7 C' t+ {, y: X本投票采取一人一票制；

本投票设为单选，每人只限一个选项；

投票人需填写校园卡用户身份信息才能进行投票。如有疑问，请拨打电话89734964；
; e; I  a5 f4 O
4 I2 y& e' @+ l6 X投票期限：2013-12-9至2013-12-13 16:00；

1、方案一：每户每月2G免费，超出部分按0.15分/M。月使用8G以内流量合适。

  }4 a% |6 S' l: ?2、方案二：每户每月10元包15G，超出部分按0.2分/M。月使用20G以内流量合适。

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

; b5 P# S" u5 [$ t4、方案四：保持现状，包月不限流量，20元/月。网络拥堵现状无法解决。

二、分析：

很多同学面对这4个方案，不知道那个适合自己，最后算是随便投一票，或者大部分人会投方案四，保持不变。这里写了简单的程序，帮助大家分析，选择投票。
: ^" ]) S( ~6 f# x- v

# p- D8 |# G7 m& k5 |$ ]7 m+ W6 n- ~
这个图自然是用matlab做出的，可以看出：
8 O! s$ A7 b( ]
) @3 o6 g# E5 ]0 ?9 W% j, u) [6 W  G1、如果你每月使用量很小，小于7G，方案一花费最低；
# e1 i. J( |! t5 `, J; @) w& e
2、如果你的使用量在7-10G或者>20G，方案三不错的；
' M- n! E, o# Q7 X2 P& `
3、方案二适合于月流量在10-20G之间的同学。
! Q% ?+ l3 n; C3 a
" S2 w& T5 E- {/ T; X三、源码：http://pan.baidu.com/share/link? ... 0&uk=4212195192
0 W9 Y4 g. Q. B0 h9 X4 U
6 g, \4 c9 [" Z9 T1、main文件
6 m. P% C5 H# Q& S' e
clc,clear,close all
yourflow = input('请输入你每月的流量(0-100G):');
* ~- h' R) t" x$ v! mflow = linspace(0,100);
3 \0 o. _7 C& t; r  Gflow = flow';
n = length(flow);
* T& u# m# u& |0 scost = arrayfun(@(f)getcost(flow,f),(1:4)','UniformOutput',false);
* f! a0 P' E. d1 \& h' f  P1 lcost = cost';
9 O- b0 u  b; mcost = cell2mat(cost);
yourcost = interp1(flow,cost(:,1:3),yourflow);
( b, \. h* Q) t1 w  S6 @2 ~- df = find(min(yourcost)==yourcost);
9 m, L; p# H$ S1 {5 uch = ['您最适合方案',num2str(f)];
figure
  N* G$ R+ k& L4 }1 ?h1 = plot(flow,cost,'LineWidth',1.5);
h2 = line([yourflow yourflow],[0 180]);
set(h1(4),'LineStyle','--')
set(h2,'LineStyle','-.','LineWidth',1.5,'color','k')
+ t$ k' v0 a, ^# r* y/ \6 zgrid on
8 J( @) l% [! W# w* Ubox on
  M% q! u- E' fxlabel('flow / G')
ylabel('cost/ Y')
' \9 ~  K6 c0 _7 P2 Wtitle('石油大学网络收费')
ht = text(yourflow,100,ch,'edgecolor','red','linestyle','-');
if yourflow>50
set(ht,'HorizontalAlignment','right')
: X2 o9 y0 ?' Qend

; ?2 _5 a6 p' W3 n/ d9 olegend('方案一','方案二','方案三','方案四','location','northwest')
# f! T; r# t# @2 H
8 j6 s: G% m- N' f  w" o; F# e2、getcost函数文件
% N5 ~9 g2 Q% }
! I+ X4 K: G& X; Hfunction c = getcost(x,f)
9 g$ p- y+ \) G  sx = x(;
n = length(x);
switch f
: H+ J# E; Z/ s3 X& l. O) ]case 1
c = method1(x);
case 2
c = method2(x);
0 t/ t8 J" z1 R  C% y# V" N* n0 Pcase 3
" `+ e) n. E: _% G( qc = method3(x);
/ _# V: F" k5 xcase 4
c = method4;
otherwise
error('no this method')
end

function y = method1(x)
; S8 P0 v2 r: A* |4 gy = zeros(n,1);
y(x>2) = 1.5*(x(x>2)-2);
end
function y = method2(x)
y = zeros(n,1)+10;
; {6 b/ J5 L8 u0 P( Uy(x>15) = 10 + 2*(x(x>15)-15);
: ]8 ]# A$ Y, Wend
2 ^+ @* N# @; e: [4 ^function y = method3(x)
2 ^8 u' T# q9 ]& U' [  A  ry = x;
; j% y( a7 v+ W5 Iend
function y = method4
' o1 _7 G' K9 [' Fy = 20+zeros(n,1);
end
  U- s! q* _) x* W: L( P& gend

HUAciscoWEI

应该好不错，渴望拥有的