- 在线时间
- 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},& Y+ O" D2 @+ A0 |. q3 p5 V6 k _
m = "a"; n = "b";
h6 D$ Q# H$ h7 q9 Q( V, U/ m- z list = Table[{m*j, n*j}, {j, 1, i}];
6 Z" z0 H1 L3 Y0 O a = list[[All, 1]];- M# Z' }8 n# q) F" x! W
b = list[[All, 2]];
& v5 l. U6 U" P; t5 r& @, c ]6 k, G3 `6 m+ Y8 U0 D5 g9 s- h
测试:9 D7 v2 I8 I3 P: t( `' {8 j
f[10, a, b]
# z) O0 J7 e7 N, e- u$ u1 O4 ^a={"a", 2 "a", 3 "a", 4 "a", 5 "a", 6 "a", 7 "a", 8 "a", 9 "a", 10 "a"}
8 ~6 r+ y4 G; I4 T. d) pb={"b", 2 "b", 3 "b", 4 "b", 5 "b", 6 "b", 7 "b", 8 "b", 9 "b", 10 "b"}0 p. t& w; j. u
. Z8 `+ k) n+ R s$ Q, F7 v7 ]8 D不知道怎么生成下标 |
|