24小时热门版块排行榜    

查看: 1534  |  回复: 10
本帖产生 1 个 程序强帖 ,点击这里进行查看
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

匿名

用户注销 (正式写手)

本帖仅楼主可见

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   同方向广播   申请程序强帖   回复此楼   编辑   查看我的主页

chyanog

金虫 (小有名气)

引用回帖:
9楼: Originally posted by liu0604 at 2013-08-03 20:08:02
厉害,请教一下Tr@#2是什么意思,求迹的东西?
能做一个简单的解释吗?感激不尽……...

其实相当于First@{a},或者{a}[[1]],Tr看起来更短小而已,
其实方法还有很多,
ak = Symbol /@ CharacterRange["a", "z"];

ReplacePart[ak, Join[# :> F1[ak[[#]]] & /@ {1, 4, 7, 9},
  # :> F2[ak[[#]]] & /@ {2, 5, 8}]]

MapAt[F1, ak, List /@ {1, 4, 7, 9}]
MapAt[F2, %, List /@ {2, 5, 8, 10}]
MapAt[F3, %, List /@ {3, 6, 12}]
10楼2013-08-03 21:36:35
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 11 个回答

mshwangg

至尊木虫 (正式写手)

【答案】应助回帖

感谢参与,应助指数 +1
aknew=ak
aknew[]=f[ak[]], i=1,4,7,9,....
aknew[[j]]=g[ak[[j]]], j=2,4,5,....
aknew[[k]]=h[ak[[k]]],k=3,11,13,15,...
f,g,h是某种计算,用函数表示了。
如果i,j,k中各个数值满足某种规律,可以把i,j,k做为循环变量进行操作。
ps:没看明白你要做什么,也没弄明白i,j,k的规律,就这样吧
2楼2013-07-22 18:35:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

mshwangg

至尊木虫 (正式写手)

引用回帖:
2楼: Originally posted by mshwangg at 2013-07-22 18:35:33
aknew=ak
aknew[]=f[ak, i=1,4,7,9,....
aknew[]=g[ak, j=2,4,5,....
aknew[]=h[ak,k=3,11,13,15,...
f,g,h是某种计算,用函数表示了。
如果i,j,k中各个数值满足某种规律,可以把i,j,k做为循环变量进行操作。
...

aknew[]=f[ak[]], i=1,4,7,9,....
怎么就丢字符了呢
3楼2013-07-22 18:37:18
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

匿名

用户注销 (正式写手)

本帖仅楼主可见
4楼2013-07-22 19:21:31
已阅   申请程序强帖   回复此楼   编辑   查看我的主页
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 TZqyNTBa07NP 2026-11-13 3/150 2026-11-15 11:36 by xSrQNSSjcgoX
[教师之家] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 TZqyNTBa07NP 2026-11-13 3/150 2026-11-15 11:25 by xSrQNSSjcgoX
[论文投稿] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +3 TZqyNTBa07NP 2026-11-13 3/150 2026-11-15 11:03 by xSrQNSSjcgoX
[博后之家] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 TZqyNTBa07NP 2026-11-13 3/150 2026-11-15 10:19 by xSrQNSSjcgoX
[考博] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 SX5mJmPWDfOO 2026-11-13 3/150 2026-11-15 08:18 by xSrQNSSjcgoX
[论文投稿] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +4 XJXMuRjD7cK7 2026-11-13 4/200 2026-11-15 07:01 by xSrQNSSjcgoX
[硕博家园] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +3 uKOSCocCb6Fm 2026-11-12 6/300 2026-11-15 02:59 by xSrQNSSjcgoX
[文学芳草园] 厉娜 +4 张丹枫1991 2026-11-09 6/300 2026-11-15 00:48 by Equinoxhua
[硕博家园] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +7 0TEMgxdT1eIw 2026-11-09 10/500 2026-11-15 00:39 by Equinoxhua
[考研] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +4 YHiw1gou1Eda 2026-11-10 7/350 2026-11-14 22:44 by Equinoxhua
[考研] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +6 FChKX8meu1ds 2026-11-09 9/450 2026-11-14 22:39 by Equinoxhua
[考博] 27博士 +6 锦鲤送福至 2026-11-10 6/300 2026-11-14 21:23 by xupeii
[公派出国] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 TgvkbZZl9tqB 2026-11-11 4/200 2026-11-12 12:48 by ECLTXnJnRSXf
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +4 cdqGD6ftHmbl 2026-11-11 5/250 2026-11-12 12:28 by ECLTXnJnRSXf
[考研] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 Z7qfCsdIiD1T 2026-11-10 4/200 2026-11-12 11:22 by HajghKOMynmz
[考博] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +6 YHiw1gou1Eda 2026-11-10 6/300 2026-11-12 10:08 by HajghKOMynmz
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 TgvkbZZl9tqB 2026-11-11 4/200 2026-11-12 08:15 by HajghKOMynmz
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 gRND4NVAZ8VG 2026-11-11 3/150 2026-11-12 07:42 by HajghKOMynmz
[考博] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 FChKX8meu1ds 2026-11-09 8/400 2026-11-12 05:30 by 9fOTqj074tIg
[考研] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +5 cqv1zKnzd7hr 2026-11-09 8/400 2026-11-12 05:08 by 9fOTqj074tIg
信息提示
请填处理意见