数学建模社区-数学中国

标题: 求教一个简单的却可以节约很大部分时间的问题！ [打印本页]

---

作者: wuqingzi    时间: 2010-4-5 13:58
标题: 求教一个简单的却可以节约很大部分时间的问题！
我用math计算的结果是很多的数组{{a1,b1}{a2,b2}...{ai,bi}},如果我想把其中的a单独列一组，b单独列另外一组，因为数据量太大，这样以便用数，请问怎样写程序呢？我是个超级大菜鸟，谢谢大家帮助！！

---

作者: tsinli    时间: 2010-4-6 16:05
% //MatrixForm
换成矩阵形式就好了

---

作者: chuchumaolu    时间: 2010-4-9 18:09
f[i_, a, b] := Module[{j, list, m, n},
3 l+ P. |1 [6 B! f1 |  m = "a"; n = "b";
: {( B0 ~2 ?# h1 d  list = Table[{m*j, n*j}, {j, 1, i}];
3 ~) D& G# n1 k: F  H9 i  a = list[[All, 1]];
+ V# d" S+ ]$ O$ G# n6 H" ?  b = list[[All, 2]];
& i) L( s" F6 e8 s' p# P* i# ?6 W  ]
测试：
f[10, a, b]
6 w/ G$ S' F4 Q- G+ H( I. Xa={"a", 2 "a", 3 "a", 4 "a", 5 "a", 6 "a", 7 "a", 8 "a", 9 "a", 10 "a"}
b={"b", 2 "b", 3 "b", 4 "b", 5 "b", 6 "b", 7 "b", 8 "b", 9 "b", 10 "b"}

4 p  P4 s, _% x9 v) i$ s不知道怎么生成下标

---

欢迎光临 数学建模社区-数学中国 (http://www.madio.net/)

Powered by Discuz! X2.5