24小时热门版块排行榜    

查看: 1647  |  回复: 7

翻身仗

新虫 (正式写手)

[求助] 如何用for循环依次调用不同的函数呢 已有3人参与

比如,第一次调用 cdfln3( ), 第二次调用cdfgev( ),等等
for循环如何实现?
func <- c (  'cdfln3', 'cdfgev', ........     )
for ( i in 1:5 ) {   func   }
这样应该不行吧
回复此楼
我是来学习的
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

1014511134

专家顾问 (正式写手)

【答案】应助回帖

感谢参与,应助指数 +1
想这样的话,加个判断?不行吗?
2楼2018-07-06 12:12:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

1036554

新虫 (初入文坛)

感觉可以用函数指针数组

发自小木虫Android客户端
3楼2018-07-06 13:00:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

cleveryun

金虫 (著名写手)

博客:https://www.orzzone.com
4楼2018-07-08 14:15:12
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

bcsnow

铁杆木虫 (著名写手)

【答案】应助回帖

感谢参与,应助指数 +1
for 里面判断,或者 i作参数,在函数里面判断
5楼2018-07-09 08:49:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lvchengrui

专家顾问 (正式写手)

【答案】应助回帖

> myfun <- function(x, y) {x + y}
> funs <- c("rnorm", "runif", "dnorm", "myfun"
> paras <- list(list(5, 1, 1),
+               list(5, 1, 2),
+               list(seq(0.01,0.99,0.25)),
+               list(2,3))
> for (i in 1:length(funs)) {
+   res <- do.call(funs, paras[])
+   print(res)
+ }
[1] 1.1676517 2.4706755 0.3297969 0.8477372 1.0756599
[1] 1.626650 1.310351 1.006046 1.814608 1.608650
[1] 0.3989223 0.3856834 0.3502919 0.2988724
[1] 5
gps
6楼2018-09-22 21:34:02
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lvchengrui

专家顾问 (正式写手)

【答案】应助回帖

myfun <- function(x, y) {x + y}
funs <- c("rnorm", "runif", "dnorm", "myfun"
paras <- list(list(5, 1, 1),
              list(5, 1, 2),
              list(seq(0.01,0.99,0.25)),
              list(2,3))
for (i in 1:length(funs)) {
  res <- do.call(funs, paras[])
  print(res)
}
gps
7楼2018-09-22 21:35:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lvchengrui

专家顾问 (正式写手)

【答案】应助回帖

醉了,代码没法正常显示
gps
8楼2018-09-22 21:37:30
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 翻身仗 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 朋友圈看到的 +4 wangzilk 2026-08-18 4/200 2026-08-18 18:31 by Niubile666
[基金申请] 明天放榜? +5 Shxjjxjkx 2026-08-18 5/250 2026-08-18 18:14 by -大大大大大-
[基金申请] 时间戳变了,能看出什么问题? +8 基诺咪客 2026-08-17 11/550 2026-08-18 17:13 by 悠然熊猫
[基金申请] 欢迎发来filecode的Mz6后的代码验证其规律 +50 医学老男孩 2026-08-13 109/5450 2026-08-18 16:56 by 医学老男孩
[基金申请] 重要消息,中午系统在维护 +9 yuleib84 2026-08-18 10/500 2026-08-18 16:52 by archvillain
[教师之家] 两姐妹,一个辛辛苦苦30岁工作当大学教师,另一个23岁就工作当开车教练 +3 瞬息宇宙 2026-08-11 7/350 2026-08-18 16:42 by LNP@mRNA
[论文投稿] 投稿咨询 +4 wwm09 2026-08-17 6/300 2026-08-18 15:36 by wwm09
[基金申请] 今天维护系统维护 祝所有人 高中 +8 gjjjzhong 2026-08-18 9/450 2026-08-18 13:01 by 家与远方
[基金申请] 哪位老哥知道今年的国自然具体哪一天放榜? +13 Ldrop2023 2026-08-13 16/800 2026-08-18 12:25 by 淀粉搬运工
[基金申请] 快农历七夕节了,轻松一下,男人悄悄话,女施主请不要进来。 +4 Tide man 2026-08-14 5/250 2026-08-18 11:35 by Tide man
[基金申请] 93BebMhtakh前后11位开头都是大写 +4 且听虎啸 2026-08-17 5/250 2026-08-18 00:49 by 蔡棒棒菂
[基金申请] 感觉是下周放榜了 +6 angus9576 2026-08-17 11/550 2026-08-17 23:57 by angus9576
[基金申请] filecode=后面第一个是大写字母 +8 wangze12014 2026-08-14 10/500 2026-08-17 17:05 by xter9665
[基金申请] 今天系统多次维护,明天很可能放榜! +8 zju2000 2026-08-16 9/450 2026-08-17 12:20 by lmz0216
[精细化工] 招聘 金属平磨液,抛光液研发工程师 +3 小天0311 2026-08-14 3/150 2026-08-16 07:31 by H9PLUS
[基金申请] 各位道友,我要去昆明玩几天,回来见。 +7 Tide man 2026-08-14 8/400 2026-08-15 01:11 by arzu_hma
[基金申请] 是这周出结果还是下周出结果? +4 yuleib84 2026-08-11 4/200 2026-08-14 23:05 by lfy8008
[基金申请] 重要来源:本周末出结果 +10 瞬息宇宙 2026-08-12 10/500 2026-08-13 15:46 by likettle
[基金申请] 不应该看fileCode +7 且听虎啸 2026-08-12 9/450 2026-08-13 14:27 by flydreamws
[基金申请] Filecode 又变了,巨变 +3 WH3796 2026-08-12 4/200 2026-08-13 14:13 by 小木虫6752397
信息提示
请填处理意见