- 在线时间
- 10 小时
- 最后登录
- 2012-5-29
- 注册时间
- 2010-3-8
- 听众数
- 3
- 收听数
- 0
- 能力
- 0 分
- 体力
- 165 点
- 威望
- 0 点
- 阅读权限
- 20
- 积分
- 83
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 65
- 主题
- 16
- 精华
- 0
- 分享
- 0
- 好友
- 2
升级   82.11% 该用户从未签到 - 自我介绍
- 学习哦,加泡妞
|
f[i_, a, b] := Module[{j, list, m, n},
+ o% Y* d9 `# M' y* ^% w! y6 O m = "a"; n = "b";7 K- A) Q* Y% Q9 {
list = Table[{m*j, n*j}, {j, 1, i}];. K0 o8 O" N8 w8 p3 O
a = list[[All, 1]];
; {' L$ z# G: U; j1 H1 E* w7 V b = list[[All, 2]];! j3 v% `5 m& V1 s" W0 z6 J7 x
]
$ }+ J) f0 q) p& ?. z测试:$ H/ e- A/ r$ `& t) ]! \# x% ?
f[10, a, b]
/ d+ j: m+ ~9 [3 k/ sa={"a", 2 "a", 3 "a", 4 "a", 5 "a", 6 "a", 7 "a", 8 "a", 9 "a", 10 "a"}
2 h; J3 T, \6 U$ x1 G, ^6 Ab={"b", 2 "b", 3 "b", 4 "b", 5 "b", 6 "b", 7 "b", 8 "b", 9 "b", 10 "b"} Q$ F* j& |6 M' Y y, U0 F
4 d4 a5 z8 U6 B4 B不知道怎么生成下标 |
|