Stats

Popular Posts

Followers

Mathematica 教學 多組數據呈現

戴忠淵 於 2012年8月14日星期二 下午3:00 發表



data=Table[RandomReal[BinormalDistribution[{-1,1},{1,2},r],100],
{r,0.1,0.9,0.1}];

GraphicsGrid[
Partition[Labeled[ListPlot@data[[#]],"data-"<>ToString@#]&/@
Range[Length@data],3]
]

n=4;
myplot=Labeled[ListPlot@data[[#]],"data-"<>ToString@#]&/@
Range[Length@data[[1;;n]]];

GraphicsGrid[
Reverse[DiagonalMatrix[Range[n]]]/.
Flatten@{0->"",Rule@@@Transpose@{Range[n],myplot}}
]


Tags: , ,

讀者回應 ( 0 意見 )

發佈留言

Please leave your name and tell me what you thought about this site. Comments, suggestions and views are welcomed.

如果這篇文章對你有幫助,那請留個訊息給我~