【问题标题】:Ploting a sequence into a graphic with maple用枫树将序列绘制成图形
【发布时间】:2018-04-16 17:44:00
【问题描述】:

我被要求找到 10 个向量,这是 MU 的结果,我现在必须将它们绘制成枫树上的图形。我该怎么做?我试图绘制一个序列但没有成功,我似乎不知道怎么做?感谢您的帮助,这是代码。

M := Matrix([[.94, 0.9e-1], [0.6e-1, .91]]);
                            [0.94  0.09]
                       M := [          ]
                            [0.06  0.91]
u0 := Vector([.8, .2]);
                                [0.8]
                          u0 := [   ]
                                [0.2]

i)



MU := seq(M^k . u0, k = 5 .. 50, 5);
      [0.688741062500000]  [0.639374880868144]  
MU := [                 ], [                 ], 
      [0.311258937500000]  [0.360625119131855]  

  [0.617470843820250]  [0.607751906216902]  [0.603439561970441]  
  [                 ], [                 ], [                 ], 
  [0.382529156179750]  [0.392248093783097]  [0.396560438029558]  

  [0.601526151918957]  [0.600677161714123]  [0.600300460249978]  
  [                 ], [                 ], [                 ], 
  [0.398473848081042]  [0.399322838285876]  [0.399699539750021]  

  [0.600133315809110]  [0.600059152932742]
  [                 ], [                 ]
  [0.399866684190889]  [0.399940847067257]

【问题讨论】:

    标签: matrix graph maple


    【解决方案1】:

    一些帮助您入门的想法。 (最后一个是动画。左键单击它,然后按出现在菜单栏附近的播放按钮。)

    restart;
    M := Matrix([[.94, 0.9e-1], [0.6e-1, .91]]):
    u0 := Vector([.8, .2]):
    
    MU := seq(M^k . u0, k = 5 .. 50, 5):
    
    plots:-pointplot([MU], style=pointline);
    plots:-pointplot([MU], style=point);
    
    datamat:=`<|>`(MU)^%T:
    
    plots:-display(
      plot(datamat,style=line),
      plot(datamat,style=point,symbolsize=15,
           symbol=solidcircle,color=blue)
    );
    
    F:=proc(n::posint)
      plots:-pointplot([MU[1..n]], style=pointline);
    end proc:
    plots:-animate(F,[trunc(n)], n=1..10, frames=10, title=``);
    

    【讨论】:

      猜你喜欢
      • 1970-01-01
      • 1970-01-01
      • 2018-11-18
      • 1970-01-01
      • 2011-11-04
      • 1970-01-01
      • 1970-01-01
      • 2018-01-21
      • 1970-01-01
      相关资源
      最近更新 更多