- 在线时间
- 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},* v* P E( e2 k
m = "a"; n = "b";2 c) o( O3 M! z' i! w& W
list = Table[{m*j, n*j}, {j, 1, i}];/ s% {' d$ q; _3 C
a = list[[All, 1]];
4 H8 l4 ?2 S) j# E+ U! ?) O8 w b = list[[All, 2]];- W. X3 l: Z1 u5 l7 B+ [; z
]8 d/ e& Z6 V/ x: s5 ~! z
测试:
# u1 x, _# r2 U5 \9 b9 [f[10, a, b]; C, [0 { n$ R
a={"a", 2 "a", 3 "a", 4 "a", 5 "a", 6 "a", 7 "a", 8 "a", 9 "a", 10 "a"}
6 s# I) Z8 P! Q: wb={"b", 2 "b", 3 "b", 4 "b", 5 "b", 6 "b", 7 "b", 8 "b", 9 "b", 10 "b"}7 M* M# `8 e7 H9 K1 B2 R" S
( o% k. Q, O" h+ O0 W不知道怎么生成下标 |
|